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Abstract 


We  describe  a  number  of  extensions  to  the  XNOVAKTC  (XKTC)  Code,  a  model  of 
interior  ballistic  phenomena  based  on  a  numerical  solution  of  the  governing  equations  for 
one-dimensional,  multi-phase  flow.  We  also  present  some  analytical  formulations  for  the 
pressure  gradient  in  a  gun  in  a  form  suitable  for  incorporation  into  a  lumped  parameter 
interior  ballistics  model. 

In  XKTC,  the  flow  resistance  formula  for  stacked  granular  propellant  is  extended  to 
account  for  the  increase  in  drag  due  to  tumbling  of  the  grains  as  the  bed  expands.  The 
code  is  also  extended  to  permit  the  analysis  of  the  consequences  of  propellant  fracture, 
with  fracture  taken  to  be  dependent  on  the  local  maximum  intergranular  stress.  An 
explicit  representation  of  the  impact  induced  granular  compaction  wave  as  a  surface  of 
discontinuity  is  encoded  to  support  the  fracture  analysis. 

The  analytical  formulas  for  the  pressure  gradient  include  the  effects  of  tube  geometry 
and  several  aspects  of  the  structure  of  the  two-phase  flow.  The  results  are  in  a  closed 
form  with  the  breech  and  base  pressure  explicitly  related  to  the  spacemean  pressure. 
Results  are  presented  for  both  granular  and  stick  propelling  charges. 
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Preface 


The  enclosed  report  is  presented  in  its  original  form  as  received  from  the  contractor  and 
without  editorial  change. 
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1 . 0  INTRODUCTION 


A  first  objective  of  this  report  is  to  document  certain  extensions 
which  have  been  made  to  the  XNOVAKTC  (XKTC)  Code  (Gough,  1990)  .  The  XKTC 
Code  is  intended  to  provide  digital  simulations  of  the  interior  ballistics 
of  a  wide  range  of  gun  propelling  charges  with  particular  emphasis  on  the 
influence  of  propellant  packaging  and  distribution  on  the  processes  of 
flamespreading  and  pressure  wave  formation.  Like  all  versions  of  the  NOVA 
Code,  (Gough,  1980a)  from  which  it  is  derived,  XKTC  is  based  on  a  numerical 
solution  of  the  governing  equations  for  the  macroscopic,  quasi-one- 
dimensional  flow  defined  by  the  solid  propellant  and  its  products  of 
combustion.  A  second  objective  of  this  report  is  to  document  certain  closed 
form  analytical  results  which  describe  the  effects  of  tube  geometry,  and  the 
structure  of  the  two-phase  flow,  on  the  pressure  gradient  in  the  gun.  These 
results  which  relate  the  breech,  base  and  spacemean  pressures  are  intended 
to  be  of  use  in  lumped  parameter  models  of  interior  ballistics. 

The  analytical  results  pertaining  to  the  pressure  gradient  are 
presented  in  Section  3.0.  The  balance  of  this  introduction  is  concerned 
with  the  XKTC  Code. 

The  XKTC  Code  is  based  on  the  balance  equations  for  macroscopically 
one-dimensional  two-phase  flow.  The  state  variables  are  to  be  thought  of 
as  averages  of  the  local  values  or  microproperties.  Intractable  microflow 
details  such  as  drag,  heat  transfer  and  propellant  combustion  are  assumed 
to  be  related  to  the  macroscopic  variables  by  means  of  empirical 
correlations.  The  resulting  equations  for  each  of  the  two  phases  —  the 
solid  propellant  and  its  products  of  combustion  —  resemble  the  equations 
for  unsteady  flow  through  a  duct  of  variable  cross-sectional  area.  The 
effective  cross-section  for  each  phase  incorporates  the  porosity  or  fraction 
of  a  unit  volume  occupied  by  the  gas-phase.  The  governing  equations  are 
solved  by  the  method  of  finite  differences  with  an  explicit  allowance  for 
the  discontinuities  in  the  state  variables  at  the  internal  boundaries 
defined  by  the  ends  of  the  increments.  Appendix  A  may  be  consulted  for 
details  of  the  scope  of  application  of  the  Code. 

The  XKTC  Code  is  the  latest  in  a  series  of  codes  in  the  NOVA  family 
of  which  that  of  Gough  (1980a),  may  be  taken  as  the  first  generally 
available  version.  The  XNOVA  Code  (Gough,  1983)  was  developed  to  take 
advantage  of  more  efficient  computational  procedures  which  had  been 
developed  in  related  studies.  XNOVA  was  intended  as  an  express  version  of 
NOVA  and  deleted  a  number  of  little-used  options.  The  XNOVAK  Code  (Gough, 
1984)  was  an  extension  of  XNOVA  to  include  finite-rate  chemistry  in  the  gas- 
phase.  XNOVAK  was  itself  extended  to  become  first  XNOVAT  (Gough,  1985), 
which  included  various  features  pertinent  to  the  tank  gun,  but  not  linked 
to  the  chemistry  model,  and  subsequently  XKTC  (Gough,  1990),  which  included 
additional  details  pertinent  to  tank  charges  and  provided  a  full  linkage  of 
the  tank  gun  and  chemistry  options.  The  current  version  of  XKTC  includes 


1 


certain  additional  features  as  discussed  in  Section  2.0.  Moreover,  it 
includes  features  developed  under  other  contracts,  namely  the  modeling  of 
in-bore  rockets  (Gough,  1988a) ;  the  modeling  of  a  traveling  liquid  charge 
(Gough,  1988b);  the  modeling  of  electrothermal  guns  (Gough,  1992,  1993);  and 
alternative  representations  of  the  thermochemistry  of  the  propellant  to 
model  near-field  combustion  (Gough,  1995) . 

Reference  may  be  made  to  Gough  (1990)  for  a  statement  of  the  balance 
equations  for  XKTC  and  to  other  sources  for  details  of  revisions  to  the 
various  code  options  (Gough,  1998b,  1991,  1992,  1993) . 

The  code  description  given  in  Appendix  A  is  comprehensive  and  includes 
the  contributions  of  all  studies  to  date. 
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2.0  REVISIONS  TO  XKTC  GOVERNING  EQUATIONS 


Two  topics  require  documentation  here.  In  Section  2.1  we  discuss 
revisions  to  the  analysis  of  flow  resistance  in  a  bed  of  stacked  granular 
propellant.  In  Section  2.2  we  review  the  analysis  of  grain  fracture  with 
emphasis  on  the  representation  of  the  compression  wave  formed  by  impact  on  the 
projectile  base  as  an  explicit  surface  of  discontinuity. 

2.1  Flow  Resistance  of  Stacked  Granular  Propellant 

Ordinarily,  granular  propellant  is  loaded  in  a  randomly  packed  fashion 
with  the  result  that  the  flow  resistance  is  large  and  the  probability  of 
pressure  wave  anomalies  is  increased.  A  stacked  granular  propellant  bed 
involves  a  careful  arrangement  of  the  grains  so  that  well  defined  axial  flow 
channels  are  created.  Such  an  arrangement  allows  charges  of  highly  progressive 
multiperforated  grains  to  have  the  low  flow  resistance  typical  of  stick 
propellant  while  avoiding  the  possibility  of  propellant  rupture  due  to 
overpressurization  of  the  perforations  which  would  occur  in  long  sticks. 

It  is  assumed  that  the  flow  resistance  for  stacked  granular  propellant 
is  similar  to  that  of  stick  propellant  when  the  propellant  is  initially  loaded 
into  a  configuration  which  creates  well  organized  axial  flow  channels. 
However,  as  the  propellant  burns  and  moves  it  is  expected  that  the  original 
well  ordered  configuration  will  be  lost.  The  grains  will  tumble  and  eventually 
the  aggregate  will  develop  the  random  structure  associated  with  ordinary 
granular  propellant.  To  capture  the  variation  of  the  flow  resistance  with  the 
changing  structure  of  the  aggregate,  we  consider  the  ratio  of  the  volume  per 
grain  to  the  volume  of  a  sphere  in  which  the  grain  may  freely  rotate.  The 
dynamics  of  the  rearrangement  of  the  structure  of  the  aggregate  are  not  modeled 
explicitly.  It  is  assumed  that  when  the  ratio  has  the  initial  value  one  or 
less,  the  aggregate  is  well  organized  due  to  the  confinement  imposed  on  each 
grain  by  its  neighbors  and  that  the  flow  resistance  is  therefore  essentially 
that  of  a  geometrically  equivalent  stick  charge.  For  generality,  as  we  see 
below,  we  admit  the  possibility  that  some  fraction  of  the  randomly  packed  bed 
flow  resistance  is  experienced  even  when  the  bed  is  well  ordered.  When  the 
volume  ratio  exceeds  one,  each  grain  is  free  to  rotate  and  we  assume  that  the 
aggregate  becomes  randomly  structured  so  that  the  flow  resistance  is  that  of 
an  ordinary  granular  bed.  For  intermediate  values  of  the  ratio,  we  simply 
interpolate  between  the  resistance  of  the  stick  charge  and  that  of  the  granular 
charge.  In  practice,  the  bed  is  fully  ignited  prior  to  any  significant 
expansion.  Since  the  flow  resistance  of  a  stick  charge  is  taken  to  be  zero  in 
the  XKTC  Code,  its  contribution  is  neglected  in  the  intermediate  regime  where 
interpolation  is  involved. 

The  volume  per  grain  is  V  /(I  -  ce)  where  Vp  is  the  superficial  or 
exterior  volume  of  the  grain  and  ce  is  the  exterior  porosity  computed  by 
neglecting  the  presence  of  the  perforations.  We  take  the  volume  for  free 
rotation  to  be  4/3nL3  where  L  is  the  length  of  the  grain,  presumably  its 
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largest  dimension.  The  volume  for  free  rotation  is  evidently  that  of  a  sphere 
with  radius  equal  to  L.  This  is  thought  to  be  a  conservative  estimate  of  the 
volume.  One  could  make  a  case  for  the  use  of  L  as  the  diameter  of  the  sphere 
which  would  lead  to  an  earlier  occurrence  of  the  prediction  of  randomization 
of  the  aggregate.  However,  the  use  of  the  smaller  estimate  implies  a  level  of 
retained  structure  in  the  sense  that  the  grains  would  be  required  to  be 
centered  within  their  respective  cells . 

The  ratio  of  the  volume  per  grain  to  the  volume  for  free  rotation  is 
evidently 


ri  = 


3 

4nL3 


(2.1.1) 


We  take  the  initial  value  of  r|  to  be  rio .  Until  the  bed  is  ignited  at  a  given 
location  the  flow  resistance  is  assumed  to  be  that  of  stick  propellant. 
Following  ignition,  the  flow  resistance  of  a  stick  charge  is  assumed  to  be 
zero.  We  admit  an  input  datum  tr  such  that  for  values  of  the  time  less  than  tr 
the  flow  resistance  of  stacked  granular  propellant  is  likewise  zero.  The  flow 
resistance  of  the  stacked  granular  charge  for  t  >  tr  is  evaluated  on  the  basis 
of  ri  according  to 


if  r>  i  1 


^S.NOM 


(1  -  Cn 


(n  -  n0) 

(i  -  u0) 


if  no  <  h  <  1 


(2.1.2) 


C 


1o 


if  H 


Here  C  is  a  dimensionless  coefficient  whose  value  is  less  than  one  and  n  is 
*i0  r 

a  relaxation  exponent.  The  form  of  (2.1.2)  is  speculative  and  the  user  of  the 

code  is  required  to  provide  values  of  C  and  n  .  It  is  suggested  that  values 

ri©  r 

be  determined  by  matching  the  code  to  detailed  observations  of  the  pressure 
distributions  in  instrumented  gun  firings. 

It  is  emphasized  that  the  analysis  of  flow  resistance  is  performed 
locally.  Thus  the  flow  resistance  can  vary  strongly  from  point  to  point  as  a 
consequence  of  local  bed  randomization. 
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The  foregoing  analysis  is  only  implemented  if  r|0  <  1  •  If  the  stacked 
granular  charge  is  defined  so  that  no  is  greater  than  one  then  it  is  supposed 
that  special  means  of  regulating  the  bed  geometry  have  been  included  and  the 
flow  resistance  is  always  evaluated  as  that  of  stick  propellant. 

We  conclude  this  section  with  a  comment  on  numerical  stability.  When  a 
stacked  granular  charge  is  dispersed  there  are  no  intergranular  stresses.  If 
in  addition,  the  interphase  drag  is  zero  due  to  the  choice  of  tr,  the  only 
force  acting  on  the  grains  will  be  the  gas-phase  pressure  gradient,  the 
buoyancy  force.  In  such  a  situation  instability  can  occur  due  to  fundamental 
physical  mechanisms.  Consider  the  situation  of  steady  flow  and  choose  a 
reference  frame  in  which  the  propellant  is  at  rest.  Let  there  be  a  local 
minimum  of  porosity  and  let  the  gas  velocity  be  subsonic.  Then  the  flow 
contraction  will  be  associated  with  a  pressure  minimum  which  implies  that  the 
pressure  gradient  will  be  such  as  to  move  the  propellant  into  the  compacted 
region  from  both  sides,  further  reducing  the  porosity.  Such  problems  are  ill- 
posed  and  cannot  be  simulated  without  the  use  of  artificial  dissipative  terms 
or  fictitious  forces.  It  may  be  possible  to  complete  solutions,  but  mesh 
indifference  will  not  be  demonstrable.  Accordingly,  the  use  of  large  values 
of  tr  is  not  recommended  and  non-zero  values  of  may  be  desirable  in  some 
cases  when  instability  is  noted  in  the  distribution  of  porosity. 

2.2  Analysis  of  Grain  Fracture 

The  analysis  of  grain  fracture  is  predicated  on  the  maximum  value  of 
intergranular  stress  experienced  by  each  local  element  of  the  propelling 
charge.  During  the  calculation  we  monitor  the  stress  in  the  bed  and  update  the 
maximum  values  as  these  are  established.  The  effect  of  fracture  is  assumed  to 
be  embedded  in  experimentally  determined  tables  of  multipliers  to  the  nominal 
surface  area  and  flow  resistance  predicated  on  the  values  of  the  maximum 
stress. 

An  important  aspect  of  this  approach  relates  to  the  numerical  accuracy 
with  which  the  stress  field  is  determined.  In  particular,  we  are  concerned 
here  with  the  stress  levels  achieved  as  a  result  of  impact  of  the  propellant 
bed  against  the  projectile  base.  For  the  sake  of  numerical  fidelity  it  is 
desirable  to  represent  the  resulting  granular  shock  wave  as  an  explicit  surface 
of  discontinuity.  The  arguments  in  support  of  this  approach  may  be  found  in 
Gough  (1980b).  We  also  include  herewith  a  review  of  the  analysis  presented 
therein  and  which  was  encoded  into  an  earlier  version  of  the  NOVA  Code.  That 
analysis  was  recoded  and  made  compatible  with  the  current  solution  algorithm 
of  XKTC . 

In  keeping  with  the  numerical  formulation  of  XKTC  we  require  a  lumped 
parameter  analysis  of  a  two— phase  region  to  model  the  compacted  region  shortly 
after  formation  when  its  resolution  as  a  one-dimensional  continuum  would  impose 
a  restrictively  low  time  step.  This  topic  is  covered  in  Section  2.2.1.  In 
Section  2.2.2  we  summarize  the  constitutive  relations  including  boundary 
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conditions  to  be  used  at  the  internal  boundary.  Section  2.2.3  notes  some 
aspects  of  the  implementation  of  the  analysis  which  may  help  in  the 
interpretation  of  the  solution. 

2.2.1  Balance  Equations  for  a  Two-Phase  Lumped  Parameter  Region 

Consider  a  lumped  parameter  region  as  depicted  in  the  sketch.  It  is 

xR  whose  functional  dependence  on  time 
will  be  furnished  from  independent 
considerations.  The  region  is 

assumed  to  have  an  instantaneous 
volume  V  which  is  available  to  the 
two-phase  flow  and  the  cross 
sectional  areas  of  the  bounding 
surfaces  available  to  the  flow  are 
taken  to  be  \  and  We  identify  xR 

with  the  external  boundary,  which  is 
at  most  gas-permeable  and  xL  with 
the  granular  compaction  wave. 
Accordingly,  we  consider  the  flux  of 
both  phases  across  xL  and  only  the 
gas  across  xR.  We  note  also  that 
the  flux  of  gas  may  correspond 
either  to  mass  addition  or  mass  loss 
but  that  only  mass  addition  is 
expected  in  regard  to  the  solid- 
phase. 

We  assume  that  the  igniter  or  primer  condensed  phase  may  have  a  finite 
density  pIG  and  be  characterized  by  a  rate  of  gasification  i|j  per  unit  volume. 
With  this  in  mind  it  is  easy  to  see  that  the  volume  of  the  lumped  parameter 
region  is  governed  by  the  ordinary  differential  equation. 


bounded  by  surfaces  located  at  xL  and 


V  =  Arxr  -  Alxl  +  VIG 


(2.2. 1.1) 


where 


V 


IG 


r 

j  A  (x)Hr(x)  dx 

*L 


(2.2. 1.2) 


represents  the  rate  of  increase  in  volume  due  to  consumption  of  the  igniter. 
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The  porosity  or  void  fraction  is  predicated  on  the  available  volume  V- 
Hence  the  balance  of  mass  of  the  solid-phase  may  be  expressed  as 


[(1  -  E)V]  =  Al(1  -  eL)  (uPi  -  XL)  -  ^  V  (2. 2. 1.3) 

Q  t  Mp 

where 

Sn  . 

m  =  (l  -  e)  Pp_E  d  (2.2. 1.4) 

P 

describes  the  rate  of  gasification  of  the  solid  propellant.  We  have  pp, 
propellant  density;  Sp,  the  surface  area  of  a  grain;  Vp,  the  volume  of  a  grain; 
and  d,  the  rate  of  surface  regression.  We  have,  moreover,  used  the  familiar 
nomenclature  for  the  state  variables:  e,  porosity;  ,  up  solid-phase  velocity. 
The  subscript  L  refers  to  values  on  the  boundary  of  the  contiguous  continuum 
region . 

In  view  of  (2. 2. 1.1),  we  may  expand  the  differential  on  the  left  hand 
side  of  (2.2. 1.3)  to  get  the  result 

e  =  —  |  ( 1  -  e  )  (  Arxr  -  alxl  )  -  ( 1  -  eL )  al  (  uPl  -  xl)|  +  (1-e)  — —  +  — 


(2. 2. 1.5) 


The  balance  of  mass  of  the  gas-phase  may  be  stated  in  the  form 


dt 


[epV]  =  eLpLAL(uL 


ErPRAR<UR  -  *R>  +  *V  +  PlGVIG 


(2.2. 1.6) 


where  we  have  p,  the  gas-density  and  u  its  velocity.  As  in  the  preceding 
section,  the  subscripts  refer  to  values  on  the  boundaries  of  the  contiguous 
regions . 

By  expanding  the  left  hand  side  and  making  use  of  (2.2. 1.1)  and  (2. 2. 1.5) 
we  may  put  (2. 2. 1.6)  into  the  computational  form 


P  =  -^  {clPlMUj.  “  *l>  “  erPrAr(ur  "  *r>  "  P<ar*r  "  al*l> 


\  +  * 

(l  -  -^-1 

*  L  _ 

— ) 

J  E 

1  pp] 

e  V  ' 

Pig  ' 

(2. 2. 1.7) 
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Using  e  to  denote  internal  energy  and  h  =  e+  p/p  +  u*el/2  to  denote  the 
total  enthalpy,  we  may  express  the  balance  of  energy  of  the  gas-phase  in  a 
frame  of  reference  whose  instantaneous  velocity  is  equal  to  that  of  the  gas  in 
the  lumped  parameter  region  in  the  following  form. 


[epeV]  -  ALcLpLhL(uL  xL)  -  ARERpRhR(uR  xR) 


‘IG'-'IG'IG  “  P  "dt  ^ 


(2.2.1. 8) 


This  equation  may  be  interpreted  as  the  statement:  rate  of  change  of  energy 
within  the  control  volume  occupied  by  the  gas-phase  equals  total  enthalpy  flux 
into  the  volume  less  work  to  expand  the  control  volume  and  heat  lost  to  the 
propellant.  The  terms  hp  and  hIG  refer  to  the  propellant  and  igniter  products 
respectively  and  are  assumed  to  embed  the  chemical  energy.  As  we  discuss 
further,  the  mass  transfer  is  assumed  to  be  adiabatic  and  to  be  governed  by  a 
quasi-steady  law  in  the  frame  of  reference  of  the  gas  within  the  lumped 
parameter  region. 

Using  Equations  (2.2.1. 1)  and  (2. 2. 1.5)  and  (2.2. 1.6)  to  simplify 
(2.2. 1.8)  we  have  the  result 

e  =  — i_  jAj^p^Uj^  -  xL)  (hL  -  e)  -  AReRpR(uR  -  xR)  (hR  -  e) 

-  p  (Arxr  -  Alxl)  +  p(l  -  eL)  Al(uPl  -  xL)  (2.2.1. 9) 


+  mV  ( ep  -  e ) 


Pigvig  ^ e 


I G 


e>  "  qD 


2.2.2  Constitutive  Relations 


We  first  state  the  conditions  which  apply  in  general  at  a  discontinuity 
in  macroscopic  two-phase  flow  (Gough,  1979)  .  Next  we  note  the  conditions  which 
apply  at  a  solid-phase  contact  discontinuity.  Then  we  turn  to  the  case  of  the 
compaction  wave. 

We  note  that  we  have  given  no  provision  yet  for  the  determination  of  the 
intergranular  stress  in  the  compacted  region*  The  intergranular  stress  will 
be  assumed  to  be  equal  to  the  value  deduced  from  an  analysis  of  the  jump 
conditions.  Accordingly,  the  stress  is  not  taken  to  be  a  function  of  the 
porosity  of  the  compacted  region  as  a  whole. 
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In  addition,  we  note  that  the  preceding  equations  have  referred  to  such 
quantities  as  the  interphase  heat  transfer  qp  and  the  rate  of  surface 
regression.  A  separate  accounting  of  these  quantities  is  not  maintained.  The 
values  in  a  lumped  parameter  region  are  assumed  to  be  equal  to  those  on  the 
boundary  of  the  neighboring  continuum  region. 

General  ■ReJs_u_l_t_s 

Let  the  speed  of  the  surface  of  discontinuity  be  us.  Denote  the 
properties  of  the  phases  on  each  side  of  discontinuity  by  the  subscripts  1  and 
2.  The  principles  of  conservation  of  mass,  momentum  and  energy  lead  to  the 
following  four  jump  conditions  or  conditions  of  finite  compatibility. 


£lPl<Ul  '  Us>  =  £2P2<U2  ‘  V 


(2. 2. 2.1) 


1  -  ei)Pp<uF 


Us>  » 


( 1  -  z7)  pn  (u 


P2 


Uj 


(2. 2. 2. 2) 


Pi  o 

+  °1  +  —  <U1  -  Us> 

y  o 


^  (l 


(uPl 


u.)‘ 


=  P2  + 


+  P^2  (U,  -  u  ) 2 


+  — £  (1  -  £,)  (u 

g0  P2 


uj- 


(2. 2. 2. 3) 


ei  + 


Pi 


("i  -  V 

2gc 


p2  (u2  -  us)- 
=  e  +  — -  + 


2ga 


(2. 2. 2. 4) 


Equations  (2. 2. 2.1)  and  (2. 2. 2. 2)  state  the  principles  of  conservation 
of  mass  for  each  of  the  phases.  Equation  (2. 2. 2. 3)  expresses  the  conservation 
of  momentum  of  the  mixture  and  introduces  o,  the  intergranular  stress  (Gough, 
1979).  Equation  (2. 2. 2. 4)  expresses  conservation  of  energy  for  the  gas-phase. 
No  energy  equation  is  stated  for  the  solid-phase  as  it  is  assumed  to  be 
microscopically  incompressible. 

The  fact  that  the  principle  of  conservation  of  momentum  can  only  be 
stated,  in  general,  for  the  mixture  implies  that  an  element  of  indeterminacy 
has  been  introduced  which  can  only  be  resolved  by  making  some  sort  of 
constitutive  assumption  regarding  the  exchange  of  momentum  between  the  phases. 
Analytically,  our  inability  to  state  separate,  generally  valid,  relationships 
to  describe  the  momentum  jump  for  each  of  the  phases  stems  from  the  nature  of 
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the  mechanical  interaction  between  the  phases.  The  mechanical  interaction 
involves  a  term  of  the  form  pVe  which  clearly  cannot  be  assumed  a  priori  to  be 
bounded  everywhere  within  a  control  volume  which  envelopes  the  discontinuity. 
Only  by  recognizing  the  possibility  of  momentum  exchange  between  the  phases  can 
(2.2.2. 3)  be  split. 

Solid-Phase  Contact  Discontinuity 

If  the  discontinuity  is  such  as  to  admit  a  jump  in  porosity  as  we  pass 
from  one  mixture  region  to  another  then,  provided  the  discontinuity  is 
physically  stable,  we  may  assume 


u  =  u 

Pi 


p2 


(2. 2. 2. 5) 


as  is  usual  in  a  contact  discontinuity. 

Moreover,  we  may  postulate,  by  analogy  with  the  single  phase  case  that 
the  intergranular  stress  will  also  be  continuous. 

°i  =  °2  (2.2.2. 6) 

With  the  assumption  (2.2.2. 6),  Equations  (2.2.2, 1),  (2. 2. 2. 3)  and 

(2.2.2. 4)  may  be  restated  as  follows 


eiPl<Ul  -  U3>  =  E2P2(U2  -  Us) 


(2.2.2. 7) 


y  o 


(2.2.2. 8) 


_i  +  -  u3>2  =  e  +  £2  +  <£2  -  u3>2 

Pi  2So  2  P2  2  90 


(2.2.2. 9) 


and  are  analogous  to  the  Rankine-Hugoniot  jump  conditions  which  constrain  the 
state  variables  on  either  side  of  a  single  phase  discontinuity,  as  for  example, 
a  shock. 
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Granular  Compaction  Wave 


We  postulate  that  (2. 2. 2. 7),  (2. 2. 2. 8)  and  (2,2.2. 9)  continue  to  govern 
the  jumps  in  the  properties  of  the  gas-phase.  The  properties  of  the  solid- 
phase  are  therefore  governed  by  the  jump  condition  (2. 2. 2. 2),  which  is 
independent  of  our  assumption,  and  by  the  following 


o1  +  (1  -  £x) 


(UPl  -  Us>' 


o,  +  (1  -  £,)  _E  ( u 

<?o 


(2.2.2.10) 


which,  of  course,  reduces  to  (2.2.2. 6)  as  u  ,  u  — ►  u  . 

Pi  Ps  S 


In  XKTC  we  have  the  following  nominal  relationship  between  a  and  i  under 
monotonic  loading  from  the  settling  porosity  s0  at  which  o  =  0  by  definition 


o.  (  e )  =  < 


e  s 

O 


0  if  £  >  E 

O 


(2.2.2.11) 


and  we  assume  that  this  applies  under  the  condition  of  shock  loading. 

In  addition  we  note  the  following  relationship  which  describes  reloading 
to  the  nominal  curve  cm  (  e  )  from  a  state  (  el7  ol )  lying  below  the  curve 


o'  (  s  )  =  a1 


Pp*2 

<?o 


<£1 


C) 


(2.2.2.12) 


and  we  note  that  a22  is  expected  to  be  an  order  of  magnitude  greater  than  ax2 . 
Then  if  (£1,01)  are  identified  as  the  porosity  and  stress  on  the  uncompacted 
side  of  the  granular  shock  we  take 


C2 ( e2 )  =  min  ( o'  ( z2 ) ,  a, ( c2 )  ) 


(2.2.2.13) 


In  most  cases  of  interest,  the  granular  bed  is  dispersed  prior  to  impact. 
Accordingly,  o1  =  0  and  zl  >  eo  .  It  then  follows  that  o2  (  z2 )  =  cm  (  z2  )  and,  of 
course,  z2  z  eo  . 
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Concerning  the  method  of  solution,  consider  first  the  case  when  a  lumped 
parameter  representation  has  been  made  of  the  compacted  region.  We  therefore 
assume,  from  the  uniformity  of  the  compacted  region,  that  up  is  given  as  equal 
to  the  velocity  of  the  external  boundary.  Moreover,  the  values  cx,  ox  and  up 
are  known  on  the  uncompacted  side  from  the  usual  computational  procedure, 
although  we  shall  have  to  comment  a  little  further  on  the  case  when  o1  ^  0 . 
Taking  ox  and  upj  as  given  for  the  moment  we  recast  (2. 2. 2. 2)  and  (2.2.2.10) 
to  yield 


g2  =  o,  + 


(1  -  ix)  (1  -  e2) 

£i  “  C2 


( u  -  u  )  2 
Pa  Pi 


(2.2.2.14) 


and 


= 


~  E2>up2  "  <X  -  Ei)u 


Pi 


E1  *  £2 


(2.2.2.15) 


Equations  (2.2.2.13)  and  (2.2.2.14)  may  be  solved  simultaneously,  using 
a  midpoint  search,  to  yield  the  values  of  e2  and  g2.  Then  us  follows  from 
(2.2.2.15)  and  the  gas-phase  properties  follow  from  the  usual  NOVA  Code 
methodology  for  a  solid-phase  contact  discontinuity. 

2.2.3  Coding  Considerations 

The  user  specifies  the  value  of  the  switch  NXCW.  If  this  is  non-zero, 
an  explicit  representation  will  be  made  of  the  granular  compaction  wave. 
Because  several  collisions  may  occur  between  the  bed  and  the  external  boundary, 
an  additional  datum  is  supplied  so  as  to  preclude  the  explicit  representation 
of  weak  waves.  The  user  supplies  a  value  XIMPV  which  is  the  minimum  velocity 
of  impact  for  which  the  explicit  analysis  will  be  conducted.  As  presently 
encoded,  the  explicit  analysis  can  be  performed  just  once  per  interior 
ballistic  cycle. 

To  incorporate  the  explicit  analysis,  the  input  program  initializes 
NRG  =  2n  +  4  regions  where  n  is  the  number  of  regions  of  propellant.  We  note 
that  this  value  of  NRG  is  greater  by  2  than  the  normal  value.  The  two 
additional  regions  are  placed  at  the  leading  edge  of  the  forward  propellant 
segment.  They  are,  of  course,  initially  collapsed. 

On  impact  region  NRG- 3  is  given  a  value  of  NDTACH  =  1  signifying  that 
boundary  motion  must  be  computed,  but  the  compacted  region  is  not  modeled  until 
it  is  large  enough  to  be  treated  as  lumped  parameter.  Eventually,  the  boundary 
motion  may  be  sufficient  to  warrant  a  continuum  representation  in  accordance 
with  the  user-specified  value  of  R20LV. 
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At  that  point,  subroutine  REG21A  is  called  to  transfer  the  solution  to 
region  NRG- 2  -  Region  NRG- 3  is  closed  and,  except  that  the  boundary  motion  is 
that  of  a  shock,  the  solution  technique  is  now  very  close  to  the  standard  NOVA 
condition.  When  the  velocity  jump  across  the  moving  boundary  is  less  than  0.01 
times  XIMPV  or  when  the  compacted  region  expands  and  the  rate  of  propagation 
of  intergranular  disturbances  becomes  zero,  the  shock  is  considered  to  have 
degenerated.  The  boundary  is  then  frozen  as  a  contact  discontinuity. 

If  the  wave  degenerates  while  the  compacted  region  is  still  lumped 
parameter,  the  region  representation  is  maintained  until  sufficient  expansion 
occurs  for  it  to  treated  as  a  continuum.  If,  on  the  other  hand,  the  wave  is 
so  persistent  as  to  approach  the  far  boundary  of  the  propellant  bed,  it  is 
transformed  to  a  contact  discontinuity  at  the  point  at  which  the  uncompacted 
section  would  have  to  be  treated  as  a  lumped  parameter  region  according  to  the 
value  of  RZOLV . 

Appendix  A  may  be  consulted  for  further  details  concerning  the  input  data 
NXCW,  RZOLV  and  XIMPV. 
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3.0  PRESSURE  GRADIENT  IN  GUN  PROPELLING  CHARGES 


In  lumped  parameter  models  of  gun  interior  ballistics  it  is  generally 
assumed  that  the  modeled  value  of  pressure  must  represent  a  spacemean  value, 
p  .  On  the  other  hand,  the  equation  of  motion  of  the  projectile  requires  a 
knowledge  of  the  value  of  the  base  pressure,  pB.  Closure  of  the  lumped 
parameter  model  therefore  requires  a  specification  of  the  relation  between  pB 
and  p.  Moreover,  the  charge  designer  needs  to  know  the  maximum  local  pressure 
in  order  to  assure  integrity  of  the  gun  tube.  This  maximum  is  assumed  to  occur 
at  the  breech  and  we  denote  the  value  by  the  symbol  pBR.  A  traditional  approach 
has  been  to  use  the  results  of  Lagrange  (Comer,  1950) .  If  the  tube  is  assumed 
to  have  uniform  area  and  the  mixture  of  propellant  and  combustion  products  is 
assumed  to  constitute  a  homogeneous  mixture  whose  density  is  independent  of 
position,  the  continuity  equation  shows  the  velocity  distribution  to  be  linear 
and  this,  in  turn,  enables  one  to  deduce  from  the  momentum  equation  that  the 
pressure  distribution  is  quadratic.  If  c  is  the  charge  mass  and  M  is  the 
projectile  mass,  it  emerges  that 


JE.  =  1  ♦ 

pb  3m 


(3.1) 


and 


=  i  + 

Pb 


C 

2M 


(3.2) 


at  all  times.  These  formulae  seem  to  give  satisfactory  results  in  simulations 
of  artillery  charges  in  which  C/M  is  typically  of  the  order  of  0.2  and  the 
difference  between  p  and  pB  is  therefore  only  a  few  percent.  In  tank  gun 
charges  for  which  C/M  is  of  the  order  of  one  and  the  difference  between  p  and  pB 
is  therefore  appreciable,  the  results  are  not  as  satisfactory. 

In  seeking  improvements  to  Equations  (3.1)  and  (3.2)  we  may  identify  the 
following  processes  which  are  omitted  from  the  theory  of  Lagrange: 

(1)  The  theory  is  inherently  incapable  of  representing  the  occurrence  of 
pressure  waves  due  to  the  interplay  between  the  ignition  train  and  the 
packaging  of  the  charge. 

(2)  Even  for  smoothly  ignited  charges,  there  is  no  representation  of  the 
propagation  of  rarefaction  waves  due  to  the  acceleration  of  the  projectile. 
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(3)  Gun  chambers  are  generally  tapered  and  the  difference  between  chamber  area 
and  tube  area  can  be  significant  in  tank  guns.  Moreover ,  the  projectile 
afterbody  may  intrude  significantly  into  the  chamber. 

(4)  An  examination  of  two-phase  flow  simulations  shows  that  the  assumption  of 
uniform  mixture  density  is  not  unreasonable  for  granular  propellant.  Although 
the  propellant  lags  behind  the  gas  with  the  result  that  a  small  region  of 
ullage  is  created  behind  the  moving  projectile,  the  distributions  of  each  of 
the  two  phases  are  fairly  uniform  over  the  length  of  the  tube.  However,  the 
velocity  lag  of  the  solid-propellant  should  not  be  neglected  in  the  momentum 
equation  for  the  mixture  which  is  used  to  construct  the  pressure  profile  from 
the  velocity  distributions. 

Of  course,  all  the  foregoing  processes  may  be  accommodated  in  a  natural 
way  through  the  use  of  a  fully  two-phase  analysis  such  as  that  embedded  in  the 
NOVA  Code  (Gough,  1980a)  .  However,  we  may  still  enquire  whether  improvements 
can  be  made  to  Equations  (3.1)  and  (3.2)  to  reflect  some  of  the  foregoing 
processes  while  at  the  same  time  retaining  the  computational  economy  and 
general  utility  of  a  lumped  parameter  approach. 

We  conclude  these  introductory  remarks  with  some  additional  discussion 
of  each  of  the  foregoing  processes.  In  Section  3.1  we  show  how  the  Lagrange 
hypothesis  can  be  extended  to  account  for  tubes  whose  cross-sectional  area 
varies  with  position.  In  Section  3.2  we  address  the  effects  of  the  slip 
velocity  between  the  propellant  and  the  products  of  combustion.  Analytical 
results  are  obtained.  In  Section  3.3  we  consider  the  effects  of  time 
dependence  of  the  cross-sectional  area.  In  contrast  to  the  two  preceding 
topics,  complete  analytical  results  are  not  pursued.  In  Section  3.4  we 
consider  the  combined  effects  of  propellant  slip  velocity  and  cross-sectional 
area  as  a  function  of  position.  Again,  full  analytical  results  are  obtained 
to  describe  extended  Lagrange  relationships  between  p,  pB  and  pBR. 

Ignition  Transients 


The  representation  of  pressure  waves  due  to  ignition  transients  seems  the 
most  difficult  process  to  embed  in  a  lumped  parameter  model.  Possibly,  an 
ensemble  of  NOVA  solutions  could  be  obtained  with  the  objective  of  expressing 
the  ratios  p/pB  and  PBR/pB/  as  functions  of  time,  parametrically  with  respect 
to  the  charge  attributes.  However,  it  is  not  clear  that  the  number  of  runs 
required  to  establish  the  functional  relations  would  be  significantly  less  than 
the  number  of  runs  required  to  address  specific  charge  configurations  of  actual 
interest.  As  far  as  the  present  study  is  concerned,  we  implicitly  exclude  from 
consideration  those  charges  for  which  strong  ignition-induced  pressure  waves 
are  present.  We  note,  however,  that  the  occurrence  of  such  waves  may  have 
little  ballistic  consequence  provided  that  they  are  not  so  severe  as  to  be 
accompanied  by  grain  fractures.  For  example,  NOVA  simulations  of  the  5-inch/54 
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caliber  Navy  case  charge  exhibit  strong  pressure  waves,  in  accord  with  experi¬ 
ments.  Nevertheless,  good  agreement  between  predicted  values  of  maximum 
pressure  and  muzzle  velocity  is  found  when  consistent  data  are  used  to  run  NOVA 
and  a  lumped  parameter  code.  This  suggests  that  the  ballistic  event  occurs 
sufficiently  slowly  for  the  effects  of  the  ignition  transient  to  be  averaged 
out. 

Rarefaction  Waves 


Rarefaction  due  to  motion  of  the  projectile  is  embedded  in  the  Lagrange 
representation  in  a  manner  which  assumes  all  elements  of  the  mixture  to  be 
expanding  at  the  same  rate,  a  rate  which  is  determined  by  the  instantaneous 
velocity  of  the  projectile.  In  reality,  of  course,  it  takes  time  for  the  state 
of  motion  of  the  projectile  to  be  impressed  throughout  the  propulsion  gas  and 
the  pressure  gradient  may  be  expected  to  undulate  as  the  unloading  waves  travel 
back  and  forth  between  the  breech  and  the  base  of  the  projectile. 

An  analytical  solution  was  obtained  by  Love  and  Pidduck  (Corner,  1950) 
for  the  special  case  in  which  the  propellant  is  all  burnt  and  quiescent  prior 
to  projectile  motion.  Their  results  show  the  ratio  p/pB  to  undergo  a  damped 
oscillation  about  an  asymptotic  value  which  is  presumably  achieved  with 
infinite  projectile  displacement.  The  value  of  p/pB,  initially  equal  to  one, 
increases  as  the  rarefaction  due  to  projectile  motion  propagates  rearward. 
When  the  rarefaction  is  reflected  from  the  breech,  the  ratio  undergoes  a 
maximum  and  returns  to  the  value  one  when  the  reflected  wave  reaches  the 
projectile  base,  after  which  it  begins  to  rise  again. 

Pidduck  and  Kent  (Corner,  1950),  noting  that  the  initial  rarefaction 
tended  to  damp  rather  quickly,  sought  a  similarity  solution  which  would  agree 
asymptotically  with  the  solution  of  Love  and  Pidduck  although  it  would  differ 
in  the  early  stages.  From  their  analysis  emerges  an  alternative  to  Equation 
(3.1)  in  the  form 


P_ 

Pb 


(3.3) 


where  5  is  the  Pidduck-Kent  constant,  a  function  of  C/M  and  the  ratio  of 
specific  heats.  Their  observation  that  the  oscillations  due  to  the  system  of 
rarefaction  waves  tend  to  damp  out  is  consistent  with  our  previous  comment 
concerning  the  averaging  out  of  the  ignition  transients.  The  fact  that  the 
Pidduck-Kent  solution  does  not  accord  with  the  earlier  stages  of  the  exact 
solution  is  not  really  of  importance,  since  the  initial  stages  of  the  exact 
solution  are  quite  remote  from  actual  propelling  charge  behavior.  Typically, 
in  real  charges,  the  propellant  is  fifty  percent  consumed  and  the  projectile 
has  achieved  fifty  percent  of  the  muzzle  velocity  at  the  time  when  maximum 
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pressure  occurs.  On  the  other  hand,  the  asymptotic  agreement  between  the 
similarity  solution  and  the  exact  solution  may  or  may  not  be  of  importance. 
One  has  to  assume  that  in  spite  of  the  highly  idealized  initial  conditions,  the 
exact  solution  nevertheless  tends  towards  the  behavior  of  a  real  charge. 

An  alternative  approach  is  contained  in  a  R.A.R.D.E.  paper  (Anon,  1964)  . 
It  is  assumed  that  the  tube  is  straight  and  attention  is  focussed  on  the 
balance  equations  for  the  gas-phase  alone.  In  place  of  the  linear  velocity 
distribution  which  emerges  from  the  standard  Lagrange  assumption,  it  is 
supposed  that  the  velocity  distribution  is  a  quadratic  whose  coefficients  are 
functions  of  time.  At  the  same  time,  it  is  also  assumed  that  the  pressure 
distribution  remains  quadratic,  as  in  the  standard  Lagrange  formulation.  The 
balance  equations  are  converted  to  ordinary  differential  equations  at  one 
point,  arbitrarily  selected  to  be  the  breech.  Limiting  arguments  are  used, 
together  with  the  boundary  conditions,  to  determine  governing  equations  for  the 
coefficients  in  the  velocity  distribution.  A  global  energy  balance  is  also 
invoked.  The  propellant  is  supposed  to  be  uniformly  distributed,  although  a 
method  of  relaxing  this  assumption  is  discussed.  The  propellant  is  assumed  to 
burn  at  a  finite  rate.  However,  we  note  that  the  balance  equations  for  the 
gas-phase  implicitly  assume  the  propellant  to  be  at  rest  and  no  consideration 
is  given  to  interphase  drag.  Neglect  of  interphase  drag  is  appropriate  only 
for  stick  propellant;  however,  the  assumption  of  uniform  distribution  is  only 
appropriate  for  granular  charges. 

Non-Uniform  Flow  Area 


Non-uniformity  can  be  due  not  only  to  variations  in  the  tube  cross- 
sectional  area,  but  also  to  the  intrusion  of  the  projectile  afterbody. 
Variations  in  tube  area  are  presumably  confined  to  the  chamber  region  and  are 
a  function  of  position  only.  This  problem  has  been  previously  addressed  by 
Vinti  (1942)  who  presented  results  corresponding  to  a  cylindrical  chamber 
connected  to  a  cylindrical  tube  of  smaller  diameter.  Vinti  also  considered  the 
effects  of  gun  recoil  and  wall  friction  on  the  pressure  gradient.  These  latter 
effects,  which  are  omitted  from  the  NOVA  Code,  are  not  considered  here. 
Analytical  results  to  express  the  influence  of  flow  area  on  the  pressure 
gradient  have  been  obtained  more  recently  by  Morrison  and  Wren  (1987). 
Variations  in  flow  area  due  to  the  intrusion  of  the  afterbody  are  a  function 
of  both  position  and  time.  We  will  show  that  the  spacewise  variations  in  flow 
area  can  be  accommodated  in  an  extended  Lagrange  formulation. 

When  the  flow  area  decreases  with  distance  downbore,  as  is  the  case  in 
normal  situations,  and  the  spacemean  pressure  is  understood  to  be  an  area- 
weighted  quantity,  one  may  deduce  that  the  ratio  p/pB  is  reduced  relative  to 
the  ideal  Lagrange  value,  Equation  (3.1).  The  Lagrange  value  will  be  attained 
asymptotically  with  infinite  projectile  displacement,  provided  that  the  non¬ 
uniformity  of  area  is  localized  to  the  chamber  and  the  projectile  afterbody. 
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However,  an  additional  complication  to  be  considered  in  the  case  of  a 
projectile  afterbody  is  that  the  motion  of  the  projectile  depends  on  a 
spacewise  integral  of  pressure  rather  than  a  local  value.  This  consideration 
is  not  pursued  in  the  present  study. 

Propellant  Velocity  Lag 

The  analysis  of  Lagrange  implicitly  assumes  that  either  the  propellant 
is  all  burnt  at  the  initial  instant,  or  that  the  burning  propellant  moves  with 
the  same  velocity  as  the  gas-phase.  The  degree  to  which  the  propellant 
velocity  remains  in  equilibrium  with  that  of  the  gas-phase  is  determined 
primarily  by  the  interphase  drag.  If  there  were  no  drag,  or  flow  resistance, 
one  might  expect  that  Equation  (3.1)  would  apply  provided  that  C  were  replaced 
by  the  total  mass  of  the  gas-phase  at  any  time.  In  such  a  situation  one  would 
expect  that  the  ratio  p  / pB  would  initially  be  nearly  equal  to  one  and  would 
gradually  increase  to  the  limiting  Lagrange  value  as  the  propellant  was 
consumed.  In  reality,  flow  resistance  will  be  present  and  the  pressure 
gradient  will  therefore  be  expected  to  exceed  that  which  would  arise  with  no 
flow  resistance.  Depending  on  the  magnitude  of  the  velocity  lag,  the 
contribution  of  the  flow  resistance,  which  is  quadratically  dependent  on  the 
difference  between  the  velocity  of  the  gas  and  that  of  the  propellant,  might 
be  such  as  to  produce  instantaneous  values  of  p  /  pB  in  excess  of  the  Lagrange 
value  given  by  Equation  (3.1) .  The  influence  of  the  propellant  velocity  lag 
may  therefore  be  such  as  to  introduce  complex  structure  into  the  time 
dependence  of  the  ratio  p/pB. 

3.1  Non-Uniform  Bore  Area 


We  consider  the  continuity  and  momentum  equations  for  unsteady  flow  of 
a  homogeneous  inviscid  substance  through  a  tube  with  variable  area  A  =  A(z)  . 

0p  1  5pAu  _  n 

3t  A  dz  9  (3.1.1) 


P 


— 

at 


+ 


au 

pu  al  +g° 


(3.1.2) 


Here  we  have  t,  time;  z,  axial  position;  p,  density;  u,  velocity;  p,  pressure; 
and  g0  is  a  constant  used  to  reconcile  dimensions. 
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We  make  the  Lagrange  assumption: 


Equation  (3.1.1)  becomes 


dAu  A  dp 

dz  p  dt 


From  global  conservation: 


A  (z)  dz 

o 


r 


(3.1.3) 


(3.1.4) 


(3.1.5) 


where  zp  is  the  projectile  position  and  C  is  the  total  charge  mass.  Using 
V  ( z )  to  represent  the  volume  between  the  breech  face  and  station  z  this  may 
be  written  as 


P  = 


C 

V(2p) 


(3.1.6) 


We  assume  that  the  variations  in  A  ( z )  are  due  only  to  the  shape  of  the  combus¬ 
tion  chamber  and,  possibly,  the  afterbody  of  the  projectile.  The  projectile 
is  assumed  to  have  velocity  Vp  and  to  move  through  a  tube  whose  area  is  fixed 
and  equal  to  AB .  Differentiating  (3.1.6)  with  respect  to  time  we  see  that 


dp  =  _  abcvp  =  _  pabvp 

dt  V2(  zp)  V(zp) 


(3.1.7) 


which  is  a  function  of  time  alone.  Substituting  into  (3.1.4)  and  using  the 
boundary  condition  u  =  0  at  z  =  0,  we  have 


A(z)u(z) 


-  *BVP 

V(zp) 


0 


ABV(z)Vp 

V(zp) 


(3.1.8) 
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If  A(z)  =  Ag,  a  constant,  this  becomes 


u(z)  =  v  -i. 


(3.1.9) 


which  is  the  usual  Lagrange  result.  Note  that  since 


cz  A  dz 


it  follows  that  for  dA/ dz  <  0,  as  is  expected  to  be  the  case,  du/dz  is  not 
constant  but  increases  with  z.  The  distribution  of  velocity  is  therefore 
superlinear  or  sublinear  according  as  dA/dz  <  0. 

The  pressure  distribution  follows  from  the  momentum  equation  (3.1.2) 


c 

Aj,V(z) 

<• 

^  VpAB2  V(z) 

1  _  V(z)  dA  ] 

V(zp) 

A(z)  V(zp) 

p  V(zp) 

A(z)  v2(z)p 

A2 (z)  dz  j 

(3.1.10) 


Combining  terms. 


and  noting  that 


V2 
2  A2 


it  follows  that 


g0 [p(z)  -  p(0)  ] 


JX(Z) 


CAb 

V2(zp) 


V(zp) 


CVp  ab2v2(z) 

2  A2  (z)  V3  (zp) 


(3.1.11) 


where 


J 


i 


o 


V(z) 
A{  z) 


dz 


Note  that  p(z)  depends  on  both  Vp  and  V  .  It  should  also  be  noted  that 
(3.1.11)  remains  unchanged  even  if  dA/dz  =  0  for  part  of  the  flow,  as  would  be 
expected  in  a  normal  gun  tube. 
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In  order  to  define  the  spacemean  pressure,  it  seems  appropriate  to  use 


> 

J  p  (x)  A(x)  dx 


o 


While  we  cannot  establish  quantitative  results  at  this  point,  we  can  draw 
conclusions  concerning  the  qualitative  behavior  of  the  pressure  ratio  p/pB. 
We  expect  actual  gun  tubes  to  have  a  tapered  chamber  with  area  reduction 
(chairibrage)  at  the  entrance  to  the  bore.  Consider  the  limiting  case  when  the 
bore  area  is  infinitesimal  compared  with  that  of  the  chamber.  A  condition  of 
stagnation  will  occur  in  the  chamber  and  the  pressure  drop  will  occur  only  in 
the  tube.  At  low  projectile  velocities  (low  Mach  number)  we  will  have 


Pb  ~  Pbr 


PBR  v2 

2g0  p 


(3.1.13) 


where  pBR  and  pBR  are  respectively  the  pressure  and  density  in  the  breech  and 
where  we  assume  that  the  amount  of  gas  in  the  tube  is  small  compared  with  the 
projectile  mass.  This  also  follows  from  (3.1.11)  if  we  note  that 
V(z  ) 

j(z)  -  - £—  (z  -  z  )  under  the  stated  conditions;  only  the  last  term  of 

Ag  p  Po 

(3.1.11)  remains. 

It  is  easy  to  see  that,  if  M  «  1,  then  p/pB  -  1  and  is  much  less  than  the 

Lagrange  value  L  =  1  +  C/3M.  We  expect  the  Lagrange  number  to  be  established 

as  z  -  «  and  V(z  )  >>  V(z„  )  .  Thus,  with  chambrage,  we  expect  a  gradual 
P  _  P  fo 

increase  of  p/pB  as  shown  in  the  following  sketch. 


_P_ 

Pb 


1  +  C/3M 


1 


time 
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We  conclude  this  section  by  considering  the  computational  implications  of  the 
foregoing  analysis.  We  may  write  Equation  (3.1.11)  in  the  form 

p(z)  =  p  (0)  +a(t)J1(z)  +b(t)J2(z)  ,  (3.1.14) 

where 


a  (t) 


C-*b 

g„v2(zp) 


V(zp) 


(3.1.15) 


b  (t) 


cVp  a| 

2g0  v3(Zp) 


(3.1.16) 


J^z) 


f  V(Z) 
j  A(Z) 


dz 


(3.1.17) 


J2(z) 


V2(z) 

A2(z) 


(3.1.18) 


The  spacemean  pressure,  as  defined  by  Equation  (3.1.12),  becomes 


p.p,0, 


where 


J3<zp)  =  f  A(z)J1(z)dz 


(3.1.19) 


(3.1.20) 


J4<Zp) 


f  A  ( z )  J2  ( z )  d  z 
o 


(3.1.21) 
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We  assume  that  p  is  the  value  of  pressure  determined  from  the  lumped  parameter 
model  using  the  equation  of  state.  Then  the  breech  pressure,  pBR,  and  the  base 
pressure,  pB,  are  evidently  given  as 


Per  =  P  - 


a  (t) 
V(zp) 


J3<Zp> 


b(t) 

V(zp) 


J<<zp) 


(3.1.22) 


and 


Pb  =  Per  +  +  b(t)  J2<zp)  *  (3.1.23) 

Some  simplification  follows  when  the  variation  in  area  is  confined  to  the 
chamber.  Such  a  situation  is  expected  when  the  tube  is  not  tapered  and  when 
the  projectile  has  no  afterbody.  If  the  initial  position  of  the  projectile 
base  is  zp  and  if  A(z)  =  Ab  for  z  ^  zp  it  follows  that 

V(zp)  =  V(2Po)  +  AgUp  -  zpJ  ,  (3.1.24) 


-W  =  + 


Ab 


V(V  <ZP  -  ZP0>  +  T  <ZP 


V 


(3.1.25) 


J2(z) 


V<V  +  VZP 


(3.1.26) 


v(zp) 


J3<  V  =  J3(  V  +  ABJ1(zpo)  (zp  -  zpo)  +  -f-  (zp  -  zpo) 


+  ^(zp-zpo)3 


(3.1.27) 


W  -J.<V 


V(z  |  .  A.U, 


V 


-v’«v 


(3.1.28) 


23 


Hence  the  geometric  terms  V(z_),  J.  (z_),  J,{z  ) ,  J,(z  )  and  J.(z)  need  be 
computed  just  once  at  the  start  of  the  calculation  and  the  values  may  then  be 
saved  for  subsequent  use. 

In  principle,  the  global  energy  balance  should  be  revised  to  a  form 
consistent  with  the  assumptions  of  the  pressure  gradient  analysis.  The  kinetic 
energy  of  the  propellant  is  found  to  be  CVp/6g0  when  the  conventional  Lagrange 
hypothesis  is  used.  From  Equation  (3.1.8)  we  see  that  an  expression  consistent 
with  the  present  analysis  is 


KE 


CVp  Al 
2  g0  v3(Zp) 


(3.1.29) 


Finally,  we  eliminate  the  implicit  dependence  of  Equations  (3.1.22)  and 
(3.1.23)  on  pB  through  a(t)  as  defined  by  (3.1.15).  The  equation  of  motion  of 
the  projectile  may  be  written  as 


Pb  ~  Pi 


RES 


(3.1.30) 


where  Mp  is  the  mass  of  the  projectile  and  is  the  bore  resistance. 

Evidently, 


a  (t)  =  ax(t)  +  a2(t)pB 
where 


(3.1.31) 


ax(t) 


CAb  AbVp  +  fcA* 

g0V2(zp)  V(zp)  Mp  Pres 


(3.1.32) 


a2(t) 


_c  a| 

MP  V2(2p) 


(3.1.33) 


Substituting  (3.1.31)  into  Equations  (3.1.22)  and  (3.1.23)  we  find 


Per  =  “Pb  +  P 


(3.1.34) 
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P  =  YPb  +  6 


(3.1.35) 


where 


a  =  1  -  a2(t)  Jx(2p) 


(3.1.36) 


P  -  -  a, (t)  Jx(zp)  -  b(t)  J2(zp) 


(3.1.37) 


Y  =  a  + 


J3(zp)  a2(t) 

vTv 


(3.1.38) 


5 


+  WVt)  +  b(t)  J4(zp) 
V(zp)  V(zp) 


(3.1.39) 


3.2  Propellant  Velocity  Lag 

In  this  section  we  explore  the  consequences  of  the  inhomogeneity  of  the 
mixture.  We  note  that  the  velocity  of  the  solid-phase  differs  from  that  of  the 
gas-phase.  We  seek  to  determine  the  effect  on  the  pressure  gradient  of  the 
propellant  velocity  lag  as  an  isolated  effect.  Thus,  in  the  present  section 
we  assume  the  cross-sectional  area  of  the  tube  to  be  uniform,  dA/dz  =  0. 
Moreover,  we  retain  the  basic  Lagrange  assumption  that  the  density  of  the  gas 
is  uniform  throughout  the  tube.  However,  since  the  propellant  velocity  lags 
that  of  the  gas,  we  explicitly  consider  the  consequences  of  the  formation  of 
a  region  of  ullage  between  the  propellant  bed  and  the  base  of  the  projectile. 
The  propellant  is  assumed  to  be  distributed  uniformly  only  over  the  region 
between  the  breech  and  the  leading  edge  of  the  bed.  Our  formulation  is 
intended  to  be  applicable  not  only  to  granular  propellant,  for  which  the  region 
of  ullage  is  relatively  small,  but  also,  with  the  help  of  certain  additional 
assumptions,  to  stick  propellant  which  remains  highly  localized  and  for  which 
the  region  of  ullage  becomes  very  large. 
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The  assumed  structure  of  the  flow  is  illustrated  in  the  following  sketch 
which  also  introduces  some  nomenclature. 


« -  L 


The  position  of  the  leading  edge  of  the  propellant  bed  is  taken  to  be  at  zb 
while  the  base  of  the  projectile  is  at  zp/  both  positions  relative  to  the 
breech  face.  The  length  of  the  ullage  is  L  =  zp  -  zb . 

We  may  write  the  continuity  equations  for  each  of  the  phases  in  the 
mixture  region  in  the  form 


3ep  A  depu  _  ^#4_v 

ST  ~Sz  e 


(3.2.1) 


-  e)  Ppu 


P 


m(t) 


(3.2.2) 


where  we  have  e,  porosity;  pp,  propellant  density;  up,  propellant  velocity;  and 
m,  the  rate  of  combustion  of  propellant.  With  respect  to  the  gas-phase  we  have 
the  traditional  Lagrange  assumption,  which  we  will  assume  to  apply  throughout 
the  tube,  namely 


dp  = 
dz 


0 


(3.2.3) 


With  respect  to  the  solid  phase  we  make  the  analogous  assumption  but  we 
restrict  it  to  the  region  occupied  by  the  mixture,  namely 
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In  addition  we  assume  that,  within  the  mixture  region,  m  is  a  function  only  of 
time  even  though,  due  to  the  pressure  gradient,  it  must  vary  with  position, 
too. 

Evidently, 


a? 

(1-E)pplf  =  ff  -*(t) 


It  therefore  follows  that  u 


(3.2.5) 

is  a  linear  function  of  position  and  evidently 


when  the  breech  boundary  condition  up(0)  =0  is  taken  into  account,  and  where 
Up  =  up(zp)  is  the  solid-phase  velocity  at  the  leading  edge  of  the  propellant 
bed. 

Moreover : 


ep  +  ih(t)  (3.2.7) 

d  z  ot 

shows  that  within  the  mixture  region  u(z,t)  continues  to  obey  the  Lagrange 
distribution 


u  -  Ug(t) 


(3.2.8) 


where  Ug  =  u(zb)  is  the  gas-phase  velocity  at  the  leading  edge  of  the  bed.  The 
symbol  Ug  refers  to  the  mixture  side  of  the  interface.  Due  to  the  discontin¬ 
uity  in  porosity  the  gas  velocity  jumps  discontinuously  at  the  interface,  at 
least  from  a  macroscopic  perspective. 

The  discontinuity  in  gas  velocity  is  retained  in  the  present  formulation. 
However,  we  will  ignore  the  concomitant  jumps  in  the  thermodynamic  properties. 
The  finite  mass  balance  at  the  interface  yields 


C  (U  -  U  )  =  U  -  U 
'a  p'  a*  p 


(3.2.9) 
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where  Ug  is  the  gas  velocity  on  the  ullage  side  of  the  interface.  The 
continuity  equation  for  the  region  of  ullage  may  be  written  in  the  form 


du  _  _  _1  J)p 
dz  p  Dt 


(3.2.10) 


Since  we  retain  the  basic  assumption  of  Lagrange,  namely  uniform  density  at  all 
times,  it  follows  that  Dp/Dt  is  a  function  of  time  alone  and  we  may  write 


vp  + 


D 

Dt 


In  p 


(3.2.11) 


where  Vp  is  the  projectile  velocity  and  L  is  the  length  of  the  ullage. 
Combining  (3.2.9)  and  (3.2.11)  we  have 


U  =  U  +  — 
g  p  E 


V  +  L  — —  In  p  -  U 
p  Dt  p 


We  will  also  require  Ug  which  we  have  as 


o  -  i 
g  £ 


=  _p  -  1  :  £  u  -  JL 
£  p  z2 


V  +  L  ——  In  p  -  U 
p  Dt  p 


L  D2  ,  L  D  , 

+ - Inp  + - In  p 

£  Dt2  £  Dt 


(3.2.12) 


(3.2.13) 


Equations  (3.2.12)  and  (3.2.13)  introduce  the  first  and  second  time  derivatives 
of  the  density.  It  is  possible  to  express  these  derivatives  algebraically  and 
thereby  to  identify  more  precisely  the  dependence  of  the  pressure  gradient  on 
the  state  variables.  However,  the  formulation  is  made  more  complicated.  For 
the  present,  therefore,  we  will  simply  assume  that  these  derivatives  can  be 
furnished  from  the  lumped  parameter  solution  by  means  of  numerical  differentia¬ 
tion.  This  approximate  treatment  is  expected  to  be  adequate  for  granular 
propellant  in  which  the  region  of  ullage  is  expected  to  remain  small  at  all 
times.  The  more  complete  analytical  approach  may  prove  necessary  in  the  case 
of  stick  propellant  for  which  the  region  of  ullage  becomes  increasingly  large 
as  the  projectile  moves  down  the  bore. 

We  now  consider  the  momentum  equations  for  the  mixture  region  which  we 
may  express  as 
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(3.2.14) 


9u  +  u  Bu  +  _£o  _dp  _  _  _£s_  +  Jh_ 
dt  dt  p  dz  ep  ep 


(up  -  u) 


t 


+  U, 


£up 

p  dz 


+ 


Qo  dp 

Pp  dz 


(3.2.15) 


where  fs  is  the  interphase  drag  and  we  assume  the  granular  aggregate  to  be 
dispersed  so  that  the  intergranular  stress  Gp  =  0.  To  get  the  pressure  gradient 
we  need  to  specify  fs.  We  assume 


fs  =  - - £p(u-up)2fs  ,  (3.2.16) 

P 

where  D  is  the  effective  grain  diameter  and  fs  is  a  dimensionless  friction 
factor.  In  general,  fs  is  a  function  of  Reynolds  number  and  particle  shape  and 
therefore  of  both  z  and  t. 

Equations  (3.2.14)  and  (3.2.15)  are  better  posed  in  divergence  form  as 


dz  pu  ^  depu2  _  „„  dp  _ 

at  az  y°  dz 


+  mup 


(3.2.17) 


a 

at 


(1  -  e )  Ppup  + 


_a_ 

dz 


(1  -  E)ppUp2  +  (1  -  £)g0  f|  =  f 


mup 


(3.2.18) 


which  can  be  obtained  through  the  use  of  the  continuity  equations. 
Adding  (3.1.17)  and  (3.1.18)  we  see  that 


ap  =  _  depu  _  JL  (1  -  e)  p  u  - 
dz  at  at  p  p  dz 


±  (1  -opX 


(3.2.19) 


We  introduce  the  mass  fraction  burned/  so  that 


<t>C  -  pAgL  <t>*C 
V(zb)  vuj 


(3.2.20) 
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where 


$.  =  4>(1  -  P^L/C) 
Also, 


(3.2.21) 


(1  -  e)pp 


(1  -  »)C 
V(2b) 


(3.2.22) 


where  C  is  total  charge  mass  and  V(zb)  is  the  instantaneous  volume  of  the 
region  occupied  by  the  mixture.  We  also  note  that 


<i>.  =  <i» 

i  -  fhh 

P\<t> 

L  +  L  —  lnp 

c 

c 

Dt 

4>C  +  (1 

-  Ipic^v 

P 

f>pV(zb)  PpV2  (zp) 

In  view  of  Equations 

(3.2.6) , 

(3,2.8) ,  (3.2. 

becomes 


e 


and  (3.2.21), 


(3.2.23) 


(3.2.24) 


Equation  (3.2.19) 


9o 


dp  = 

8z 


d 

at 


z  C 

zb  v<zb> 


4>.Ug  +  (1  -  <t>)Up 


_a_ 

dz 


4>.Ug  +  (1  -  4»Up2 


(3.2.25) 


Following  expansion  of  the  derivatives  and  simplification  this  becomes 

2<t>  U 

4>.Ug  +  (1  -  0>)Up  +  4>.Ug  -  <t>Up  +  -JS.  (Ug  -  Up) 

Zb 

(3.2.26) 

We  may  eliminate  Ug  by  means  of  Equation  (3.2.13).  Also,  we  may  express  the 
solid-phase  momentum  equation  in  the  form 


ap  z 


dz 


zb  v<zb> 
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(3.2.27) 


D  p 

p 


[u  -u  l2f  -  *2 

ap 

l  g  pJ  a  P 

5z 

9 


which  then  allows  us  to  eliminate  Up  from  (3.2.26).  We  get 


6p  _  _  z  c 

ilr  —  llr 

dp 

dz  zb  V(zb) 

P 

L  p 

d z 

2b. 

(3.2.28) 


where 


♦i  =  V  +  v  ^  ' 


(3.2.29) 


V  =  <>.Ug  -  <DUp  -  4>. 


V  +  L  — —  Inp  -  U 
p  Dt  p 


<l>. 


D2  •  D 

L  - In  p  +  L In  p 

Dt2  Dt 


2t.U 


(3.2.30) 


♦  h  -£.  fu  -  u  i2  f  , 
Dpi9  pJ  s  ' 


"p 


i|r2  =  1  -  <J>  - 


(3.2.31) 


Evidently, 


5p 

02 

z* 


C _ 

S0V<2b>  x  *2C 
PpV(2b) 


(3.2.32) 


Substituting  back  into  (3.2.28)  we  have  the  following  expression  for  the 
pressure  gradient  in  the  mixture  region 
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(3.2.33) 


dp  = 

dz 


-  ka(t)z 


f 


where 


ki 


c _ »i 

9oZbV<Zb>  x  »2C 
PpVUb> 


(3.2.34) 


We  note  that  kx  depends  on  the  base  pressure  pB  =  p(zp)  through  the  term 
V  .  We  take  the  equation  of  motion  of  the  projectile  to  be 


(3.2.35) 


Evidently,  from  Equations  (3.2.29)  and  (3.2.35), 
kl  =  kllPB  +  k12 


(3.2.36) 


where 


C<|),Ab  k2 

=  v<zb>Mpzb  “ 


^2 


(3.2.38) 


kl2  g0v<zb>  zi 


^1  ~  ^llPRES 


(3.2.39) 


Then  by  integrating  (3.2.33)  we  see  that  the  pressure  distribution  within  the 
mixture  can  be  expressed  in  terms  of  pBR  and  pB  as  follows 


p(z)  =  P 


BR 


Zj 

2 


f  ^uPb  +  ^12  J 


(3.2.40) 
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To  complete  the  analysis  we  must  now  turn  our  attention  to  the  pressure 
distribution  in  the  region  of  ullage.  The  momentum  equation  for  the  gas  in  the 
ullage  is 


5p=__P  du  +  du 
dz  g0  dt  dz 


(3.2.41) 


We  note  that  the  velocity  distribution  in  the  ullage  varies  linearly  with 
distance  between  the  value  Ug  at  the  mixture  boundary  and  the  value  Vp  at  the 
projectile  base.  Evidently,  from  Equation  (3.2.10), 


U  =  Vp  +  (zp  -  z)  -jllnp  .  (3.2.42) 

Substitution  into  (3.2.41)  and  integrating  yields  the  pressure  distribution  in 
the  ullage  in  the  form 


r  i  r 

[vp  +  zpaJ[z  -zb 

- 

Z2  -  2.1 

A 

2 

(3.2.43) 


where 


A  = 


Dt‘ 


In  p  - 


—  Inp 
Dt 


(3.2.44) 


We  note  the  implicit  dependence  on  pB  through  the  term  Vp  in  (3.2.43). 


From  (3.2.40)  and  (3.2.43)  we  can  now  determine  the  spacemean  pressure  p 


as 


V  ♦ 
p  3 


2  z_ 


(3.2.45) 


We  may  eliminate  p(zp)  by  means  of  (3.2.40).  Also,  Vp  may  be  eliminated  from 
(3.2.43)  and  (3.2.45)  by  means  of  (3.2.35).  We  note  the  tacit  neglect  of  the 
pressure  jump  at  the  mixture  boundary. 

Following  some  straightforward  manipulations  we  find  the  following 
relationships  between  p,  pBR  and  pB. 
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Per  =  OPB  +  P 


(3.2.46) 


p  =  YPB  +  6 


(3.2.47) 


vn 


PLA* 

Mp 


(3.2.48) 


P  = 


M_ 


Pres 


pL2A 

2g0 


(3.2.49) 


Y  =  a 


^11  Zb 

2z_ 


PA^2 

2zpMp 


(3.2.50) 


6  =  0  - 


k  z2 

*12  zb 

’  *£  +L 

_  PL2 

2  LA 

2ZP 

3 

2  So  zp 

3  90  M  Pres 

,  p 

(3.2.51) 


We  also  note  the  total  kinetic  energy  of  the  propellant  and  the 
combustion  products.  From  Equations  (3.2.6),  (3.2.8)  and  (3.2.42)  it  follows 
that  the  kinetic  energy  is  given  by 


(l  -  c)Ppu; 


AbPL 

6  So 


3Vd2  +  3V  L  —  lap  +  L2 
P  p  Dt 


(3.2.52) 

The  foregoing  may  be  used  to  make  the  lumped  parameter  energy  equation 
consistent  with  the  present  two-phase  analysis. 

As  we  noted  previously,  the  explicit  recognition  of  the  presence  of  the 
region  of  ullage  allows  the  present  two-phase  analysis  to  be  extended  to  the 
case  of  stick  propellant.  Two  additional  considerations  are  necessary.  First, 
we  must  recognize  that  Equation  (3.2.27)  does  not  apply  to  stick  charges 
because  it  neglects  the  important  influence  of  the  stress  transmitted  through 
the  stick  charge.  Because  stick  propellant  normally  retains  its  mechanical 
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integrity,  its  length  does  not  change  appreciably  during  combustion.  To  apply 
the  present  analysis  to  stick  charges  we  retain  all  the  foregoing  results  with 
the  exception  of  (3.2.27)  as  a  means  of  determining  the  mixture  boundary. 
Equation  (3.2.27)  is  replaced  by  the  assumption  that  Up  =  0  at  all  times  and 
that  the  stick  charge  remains  uniformly  distributed  between  the  breechface  and 
the  mouth  of  the  tube  throughout  the  interior  ballistic  cycle.  NOVA  Code 
simulations  show  this  assumption  to  be  reasonably  good  for  single  increment 
slotted  stick  charges,  the  type  most  commonly  used.  Since  Equation  (3.2.27) 
is  equivalent  to  (3.2.15)  it  follows  that  some  approximation  must  also  be 
involved  in  the  use  of  Equation  (3.2.33)  which  is  derived  from  (3.2.15).  It 
is  not  difficult  to  see  that  (3.2.33)  remains  valid  provided  that  p  is  viewed 
as  the  total  stress,  a  sum  of  contributions  due  to  the  gas-phase  pressure  and 
the  intergranular  stress.  The  validating  assumption  in  connection  with  the  use 
of  (3.2.33)  for  stick  propellant  is  that  the  partial  stress  due  to  the 
intergranular  forces  is  small  by  comparison  with  the  pressure  of  the  gas. 
Again,  NOVA  solutions  show  this  assumption  to  be  reasonable  in  cases  of 
practical  interest. 

The  second  consideration  relates  to  the  burnout  of  the  stick  charge. 
NOVA  solutions  exhibit  a  pronounced  wave  propagation  effect  in  relation  to  the 
influence  of  burnout  on  the  pressure  at  the  base  of  the  projectile.  This  wave 
effect  stems  from  two  causes.  First,  the  slotted  stick  has  a  rather  neutral 
burning  characteristic  so  that  the  rate  of  gasification  is  nearly  constant 
right  up  to  the  instant  of  burnout.  The  flowfield  is  therefore  required  to 
adjust  itself  to  a  nearly  instantaneous  loss  of  a  strong  local  source  of 
combustion  products.  The  adjustment  is  transient  in  nature  and  takes  some  time 
to  propagate  from  the  combustion  chamber  to  the  base  of  the  projectile.  Until 
the  burnout  wave  reaches  the  base  of  the  projectile  the  base  pressure  is 
relatively  elevated  and  some  performance  enhancement  can  result  if  muzzle  exit 
occurs  prior  to  arrival  of  the  wave. 

We  address  this  topic  in  an  approximate  manner.  We  assume  that  after 
burnout  occurs  for  a  stick  charge  the  velocity  distribution  becomes  bilinear. 
A  hingepoint  propagates  from  the  mouth  of  the  tube  towards  the  base  of  the 
projectile  at  the  local  acoustic  wavespeed.  At  the  hingepoint  the  velocity 
distribution  suffers  a  discontinuity  of  slope.  We  assume  that  this  bilinear 
distribution  can  capture  the  effects  of  the  primary  burnout  wave.  We  do  not 
consider  the  implications  of  reflection  of  the  wave  from  the  base  of  the 
projectile.  After  the  wave  overtakes  the  projectile  the  velocity  distribution 
is  assumed  to  remain  linear  in  accordance  with  the  basic  Lagrange  assumption. 
Thus  the  approach  taken  here  is  intended  to  address  stick  charges  for  which 
overbaking  of  the  projectile  by  the  burnout  wave  either  does  not  occur  or  else 
occurs  shortly  before  muzzle  exit. 

Let  tb  be  the  time  at  which  burnout  occurs  and  let  <i>b  be  the  fractional 
rate  of  consumption  of  the  propellant  at  burnout.  Let  z.  and  u.  respectively 
denote  the  position  of  the  hingepoint  and  the  local  gas  velocity.  Evidently 
we  will  have  to  integrate  the  ordinary  differential  equation 
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(3.2.53) 


dz, 

dt 


u.  +  c 


where  c  is  the  isentropic  sound  speed  which  we  may  approximate  in  terms  of 
spacemean  properties  as 


c 


90YP 
(1  -  bp) 


(3.2.54) 


Here  we  have  used  y  as  the  ratio  of  specific  heats,  the  overbar  being  used  to 
avoid  confusion  with  the  term  defined  by  Equation  (3.2.50).  We  have  used  b  to 
denote  the  covolume . 

The  initial  condition  for  Equation  (3.2.53)  is  taken  to  be 


Then  the  bilinear  velocity  distribution  is  given  by 


u.z/z. 


0  i  Z  5  Z. 


u(z)  = 


(3.2.56) 


+ 


(VP  -  uj  (z  -  z.) 

(Zp  -  z.) 


Z.  ^  Z  i  Zp 


Following  burnout.  Equations  (3.2.10)  and  (3.2.41)  apply  throughout  the  chamber 
and  tube  and  may  be  used  to  construct  the  velocity  and  pressure  distributions. 
However,  we  note  a  fundamental  inconsistency  between  the  Lagrange  assumption 
of  uniform  density  and  the  assumption  of  a  bilinear  velocity  distribution  after 
burnout.  The  bilinear  distribution  implies  different  values  of  du/dx  and  hence 
of  Dlnp/Dt  on  each  side  of  the  hingepoint.  After  burnout  the  global  mass 
balance,  expressed  in  terms  of  the  spacemean  density,  is 


1  Dp  _  _  AEVp 

p  Dt  V(zp)  '  (3.2.57) 

While  we  will  use  this  equation  to  resolve  values  of  density  and  rate  of  change 
of  density  in  the  subsequent  analysis,  we  assume  implicitly  that  the  densities 
on  each  side  of  the  hingepoint  may  differ  from  the  spacemean  value. 
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In  front  of  the  hingepoint  the  flow  is  adapting  to  the  motion  of  the 
projectile  but  is  still  under  the  impression  that  the  propellant  is  burning. 
Thus  we  have 


1  Dp  _  _  W 
p  Dt  V(zp) 


+  <t>bc 


1 

P 


z.  £  z  £  Zp  .  (3.2.58) 


From  Equation  (3.2.10)  we  may  now  identify  the  gas  velocity  at  the  hingepoint 
as 


=  V 


(zp  -  z.) 


*BVP 

V(zp) 


-  <i>bc 


3. 

P 


(3.2.59) 


We  may  now  construct  the  pressure  distribution  from  the  momentum 
equation,  (3.2.41).  We  use  (3.2.56),  (3.2.59)  and  (3.2.35).  We  find 


Per  "  22<k34PB  +  k35> 


p(z)  = 


P.  “  ( k5i  +  k52  PB^  (Z  ~  Z»^  ~  k53  ( Z  Z»  J 


0  £  Z  £  Z. 


z.  s  z  s  zp 


(3.2.60) 

where  p.  is  the  pressure  at  the  hingepoint.  We  also  have  introduced  the 
following  terms 


k31  *  1  - 


V(zp) 


(3.2.61) 
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(3.2.62) 
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(Vp  -  Z.) 
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(3.2.63) 
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(3.2.65) 
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V(2p) 


(3.2.66) 
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(3.2.67) 
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(3.2.68) 


X  =  (Vp  -  Uj  /  (2  -  2.) 


(3.2.69) 
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(3.2.70) 
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k53  “  k42^ 


(3.2.72) 


From  Equation  (3.2.60)  we  may  eliminate  p.  and  deduce 


Per  =  «Pb  +  P 


(3.2.73) 
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where 


a  =  1  +  z.2k34  +  k52(zp  -  z.) 


(3.2.74) 
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+  k53<ZP 


2.2) 


(3.2.75) 


Furthermore,  integration  of  (3.2.60)  and  elimination  of  and  pBR  yields 

p  =  YPB  +  5  ,  (3.2.76) 

where 
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(3.2.77) 


5 


(ZP  '  2>)  <k3S  -  k33>Z.2  - 


51 

2z_ 


(2. 


Z*)2‘  3F 


(Zr 


Z.3) 


(3.2.78) 

A  similar  approach  has  been  used  by  Morrison  and  Coffee  (1990)  in  an 
application  to  Regenerative  Liquid  Propellant  Guns. 

3.3  Area  a  Function  of  Position  and  Time 


We  now  consider  the  continuity  and  momentum  equations  for  unsteady  flow 
of  a  homogeneous  inviscid  fluid  through  a  tube  with  variable  area  A  =  A(z,t) 


dAp  +  dpAu  _  Q 
dt  dz 


P 


du 

dt 


pu 


du 

dz 


(3.3.2) 
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We  assume  that 


A  =  Ae  -  A. 


(3.3.3) 


where  Ae  is  the  area  of  the  tube,  a  function  of  2  only,  and  Ai  is  the  area 
defined  by  the  local  intrusion  of  the  afterbody,  a  function  of  both  z  and  t. 
We  note  that 


3A  _  dA. 

dt  ~  ~dt  '  (3.3.4) 


and  since  Ai  is  constant  in  a  frame  moving  with  the  projectile  velocity  Vp 


dA  _  „ 
dt  p  dz 


(3.3.5) 


We  make  the  Lagrange  assumption 


so  that  (3.3.1)  becomes 

dAu  A  jjp  _  dA 

dz  p  dt  dt 


As  before,  we  note  that 


pV(zp)  =  C 
so  that 


1  ap  _  1 

P  dt  V(2p) 


(3.3.6) 


(3.3.7) 
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Also,  we  have 


£V,V 


5 

dt 


j  A(z,t)dz 
0 


/ 


where  Ag  is  understood  to  be  A(zp, t)  and  will  not,  in  general,  be  the  area  of 
the  tube.  Equation  (3.3.7)  may  be  integrated  with  respect  to  z.  Using  the 
boundary  condition  u(0,t)  =0  it  follows  that 


A(z,  t)  u  (z,  t) 


V(z,t) 

V(zp,t} 


dA 

dt 


dz 


(3.3.8) 


Equation  (3.3.8)  may  be  compared  with  Equation  (3.1.8).  We  note  that  (3.3.8) 
satisfies  the  boundary  condition  u(zp,t)  =  Vp,  as  it  must  for  consistency, 
independently  of  the  form  of  dA/dt.  No  further  progress  or  simplification  can 
be  made  unless  dA/dt  is  specified.  For  the  particular  case  of  interest  here 
we  may  make  use  of  Equation  (3.3.5)  to  deduce  the  result 


A(z,t)u(z,t)  =  Z^H_[ab  +  A.(zp,t)  -A.(0,t)]vp 


-  [  A.(z,t)  -  Aa  (0,  t)  ]  Vp 


(3.3.9) 


If,  moreover,  Ai(0,t)  =0,  as  might  be  expected  for  this  case,  then 


(3.3.10) 


As  in  Section  3.1  we  could  now  proceed  to  determine  the  pressure  distribution 
from  the  momentum  equation.  The  formulism  will,  however,  be  complicated  by  the 
presence  of  the  integrals  of  A.(z,t)  .  Moreover,  the  equation  of  motion 
(3.1.32)  will  be  complicated  by  the  introduction  of  an  integral  of  pressure 
over  the  intruding  afterbody.  Accordingly,  further  analytical  results  are  not 
pursued. 
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3.4  Combined  Effects  of  Area  and  Propellant  Lag 


We  now  attempt  to  combine  the  influence  of  variable  area  with  that  of 
propellant  velocity  lag.  We  assume  that  the  variation  in  area  is  confined  to 
the  propellant  chamber  and  that  the  propellant  initially  fills  the  chamber. 
Subsequently,  a  region  of  ullage  may  develop  between  the  mixture  and  the  base 
of  the  projectile.  However,  the  cross-sectional  area  within  the  ullage  is 
assumed  to  be  constant  and  equal  to  at  all  points.  Attention  is  focussed 
principally  on  granular  propellant  although  we  comment  on  the  applicability  of 
the  results  to  stick  propellant  at  the  end  of  the  section.  Nomenclature  is  as 
in  the  previous  sections. 

We  have  the  continuity  equations  for  each  of  the  phases  within  the 
mixture  region  in  the  forms 


dz  p 

at 


+  d£  puA 
A  dz 


=  ih(t) 


(3.4.1) 


°pf!  "  i  -k  11  ‘  tlcpu»A“*(t) 


(3.4.2) 


As  in  Section  3.2  we  assume  that  within  the  mixture  region 


dp  _  de  _  p 
dz  dz 


(3.4.3) 


Moreover,  the  uniformity  of  the  gas-phase  density  is  assumed  to  extend 
throughout  the  tube  and  to  apply  in  the  region  of  ullage  as  well  as  in  the 
mixture.  Let  the  mixture  boundary  be  at  zb  and  let  the  boundary  values  of  the 
gas-  and  solid-phases  be  Ug  and  Up  respectively.  Moreover,  since  A(zb)  =  \  it 
follows  from  (3.4.1)  and  (3.4.2)  that 


up(z) 


u(z) 


=  U 


A* 

[  V(z) 

A(z) 

L  v(zb) 

V(z) 

A(z) 

v(Zb) 

(3.4.4) 


(3.4.5) 
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The  conditions  in  the  region  of  ullage  are  unchanged  from  Section  3.2. 
Accordingly ,  Equations  (3.2.9)  through  (3.2.13)  are  applicable  here.  To 
construct  the  pressure  gradient  in  the  mixture  region  we  require  the  momentum 
equations  which  we  may  express  in  divergence  form  as 


1  d  ^  d  2 

—  — Aepu  +  — Aepu 
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(3.4.7) 


As  in  Section  3.2  we  assume  that  intergranular  stresses  can  be  neglected.  By 
adding  (3.4.6)  and  (3.4.7)  we  get 


9°  If  ■  -  aTIT  ■k[a<iUou  *  AlzM1  '  £l0-u'>] 

(3.4.8) 

-  — -J-  f  A(z)  epu2  +  A(z)  (1  -  e)p  u^  1 
A(z)  dz  l  p  F  J 


If  we  now  introduce  <|>,  the  mass  fraction  burned,  we  see  that  the  previous 
relations  (3.2.20)  through  (3.2.24)  are  applicable  here.  Thus  we  may 
substitute  (3.2.20)  and  (3.2.22)  together  with  (3.4.4)  and  (3.4.5)  into  (3.4.8) 
to  get  the  result 


a  5p  = 

CAgVU)  d 

*.U9  + 

(1  -  <D)Up 

g°  dz 

A(z)  dt 

V2(zb) 

V2(zb) 

ca |  r 

4>.Ug2  +  (1  - 

<i>)  u 2 1  _fL 

V2(z) 

A(z)  V3  (zb)  1 

91  p  J  dz 

A(z) 

(3.4.9) 
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Following  expansion  of  the  derivatives  and  simplification  we  get 


dp 

dz 


CAbV(z) 


A(z) V  (zfc) 


<D.U  +  (1  -  <D)U  +  <0.U  -  <|>U 


2A„ 


V(zb) 


<t>  u  fu  -  U  1 

■  si  9  p  J 


AbV(z) 

V(zfc)A2(z) 


dA 

dz 


+ 


(1 


(3.4.10) 


It  is  easy  to  verify  that  when  A(z)  =Aj  so  that  V(z)  =  AjZ,  then  (3.4.10) 
reduces  to  (3.2.26)  as  it  should.  On  the  other  hand,  when  <J>  =  <J>.  =  1,  zb  =  zp, 
L  =  0,  Ug  =  Up  =  Vp,  then  (3.4.10)  reduces  to  (3.1.10). 

As  in  Section  3.2  we  proceed  to  eliminate  Ug  from  (3.4.10)  using 
(3.2.13).  Similarly,  we  use  (3.2.27)  to  eliminate  Up.  We  find 


dp  _  _  V(z)  cab 
0  dz  A(z)  V2(zb) 


dp]  _t  *b  V(z)  dA 
dz  J  V(zb)  a2(z)  dz 

zb 


(3.4.11) 


where 


(3.4.12) 


V  -  <t>.Ug  "  <i>Up  -  ♦. 


V  +  L  — —  lnp  -  U 
p  Dt  p 


D2  d 

L - lnp  +  L -  lnp 

Dt2  Dt 


+  2$  U  — fu  -D  1+  ^i.[o  -u]2f  , 

*  9  V(zb)  l  9  pJ  Dp  pp  l  9  pJ  3 


(3.4.13) 


Hr2  =  1  -  <J» 


4>. 


(1  -  e) 


c 


(3.4.14) 
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(3.4.15) 


*3  =  <t>,Ug  +  (1  -  4>)Up 

It  should  be  noted  that  (3.4.12)  through  (3.4.14)  are  identical  with  (3.2.29) 
through  (3.2.31)  except  for  the  penultimate  term  of  (3.4.13).  By  setting 
z  =  z.  in  (3.4.11)  we  may  solve  for  (dp/dz)  .  Recalling  that  ( dA/dz )  =  0  we 

°  2b  2b 

find 


dp 

dz 

2b 


C _ »i 

9ov(zb>  1  *2C 

PpV(zb) 


(3.4.16) 


which  is  identical  to  (3.2.32).  We  may  substitute  (3.4.16)  into  (3.4.11), 
integrate  with  respect  to  z,  and  use  (3.2.25)  to  eliminate  Vp  from  ij/,  to  get 
the  following  relation  for  the  pressure  in  the  mixture 

p(z)  =pBR  +  [a1(t)  +  a2  (t)pB  ]  (z)  +  b(t)  J2(z)  ,  (3.4.17) 


where  J^z)  and  J2(z)  are  defined  by  Equations  (3.1.17)  and  (3.1.18)  and  we 
have 
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(3.4.18) 
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(3.4.19) 


Ct3  ab2 


2g0  v3(zb) 


(3.4.20) 


In  the  ullage  the  pressure  distribution  is  unchanged  from  the  form  deduced  in 
Section  3.2;  thus  Equation  (3.2.43)  applies.  The  procedure  outlined  in 
Sections  3.1  and  3.2  may  be  followed  here.  The  spacemean  pressure  is  assumed 
to  be  area-weighted  as  in  Section  3.1  We  deduce 
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Per  =  «Pb  +  P 


(3.4.21) 


where 


a  =  1  -  a2(t) 


+  PA3L 


(3.4.22) 
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a,(t)  J.fzJ  -  b(t)  J2(zb) 
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2g0 


(3.4.23) 


and, 


P  =  YPb  +  6 


(3.4.24) 


where 


Y  =  a  + 


a2(t) 

v<V 


+  ABLJl<Zb>  ]  - 


pAB2L2 

2MpV(zp) 


(3.4.25) 


b  (t) 


V(2p) 


V(2p) 


PAbl2  2LA  _  go^PREs 
2g0V(zp)  [  3  Mp 


(3.4.26) 


We  have  introduced  J3(z)  and  J4(z)  as  defined  by  Equations  (3.1.20)  and 
(3.1.21).  Under  the  stated  assumptions  of  the  present  section  it  follows  that 
v  (zP)  and  J1(zp)/  J2(zp)>  JjtZp)/  J<(Zp)  may  be  evaluated  according  to  Equations 
(3.1.24)  through  (3.1.28)  with  zb  replacing  zp  in  the  evaluation  of  the  J. 
terms,  i  =  1, . ,4. 
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We  have  tacitly  assumed  that  we  were  dealing  with  granular  propellant. 
As  in  Section  3.2,  however,  the  present  analysis  is  applicable  to  stick  charges 
provided  that  the  same  approximations  can  be  made.  Moreover,  the  analysis  of 
the  pressure  gradient  subsequent  to  burnout  of  the  stick  charge  can  be  treated 
as  in  Section  3.2.  The  only  modification  is  the  replacement  of  a  linear 
velocity  distribution  behind  the  hingepoint  by  the  form  expressed  in  Equation 
(3.4.5).  Further  results  may  be  found  in  a  report  by  Robbins  et  al  (1990). 
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INTRODUCTION 


Our  intention  in  this  Appendix  is  to  provide  the  user  of  the  code  with 
some  understanding  of  its  macrostructure  and  full  details  of  the  specification 
of  input  data.  We  do  not  attempt  to  document  the  code  in  such  detail  as  to 
permit  revisions  by  the  user.  XKTC  is  an  extension  of  NOVATC,  XNOVAT  and 
XNOVAK  which  are,  in  turn,  extensions  of  the  express  version  of  the  NOVA  Code 
known  as  XNOVA.  XNOVA  is  a  subset  of  the  NOVA  Code  and  certain  of  the  details 
of  the  original  versions  of  the  NOVA  Code  which  were  deleted  in  the  preparation 
of  XNOVA  are  also  absent  from  its  successors  XNOVAK  and  XNOVAT.  Discussions 
of  the  structure  of  NOVA,  NOVATC,  XNOVA,  XNOVAK  and  XNOVAT  may  be  found  in 
earlier  reports  (Gough,  1980a,  1981, 1983a,  1983b,  1984, 1985)  .  Although  we  provide 
a  complete  tabulation  of  the  present  set  of  code  subroutines  and  functions,  our 
general  discussion  is  confined  to  the  differences  between  the  current  version 
of  XKTC  and  its  predecessors,  including  the  previous  version  (Gough,  1986a) . 

The  discussion  of  structure  and  of  input  is  contained  in  the  two 
following  Sections.  Before  proceeding,  however,  we  wish  to  draw  the  user's 
attention  to  certain  general  restrictions  on  the  use  of  the  code. 

First,  it  should  be  noted  that  existing  NOVA,  XNOVA  and  NOVATC  data 
bases  cannot  always  be  read  by  XNOVAK,  XNOVAT  or  XKTC.  Although  we  always 
attempt  to  maintain  data  base  compatibility  between  the  various  code 
versions,  XNOVAK,  XNOVAT  and  XKTC  do  require  a  minor  change  to  pre-existing 
data  bases.  File  [M4],  described  in  Table  A.  6,  always  consists  of  two  cards 
in  XNOVAK/XNOVAT/XKTC  data  sets.  Pre-existing  NOVA,  XNOVA  and  NOVATC  data  sets 
in  which  File  [M4]  consisted  of  just  one  card  may  be  made  compatible  with 
XNOVAK/XNOVAT/XKTC  by  the  incorporation  of  a  single  blank  card  following  the 
pre-existing  File  [M4] .  No  change  is  required  to  pre-existing  data  bases  for 
which  [M4]  already  consisted  of  two  cards.  A  corresponding  revision  to 
XNOVAK/XNOVAT/XKTC  data  bases  is  required  if  they  are  to  be  run  on  NOVATC, 
XNOVA  or  NOVA.  However,  all  XNOVAK  data  bases  can  be  read  by  XNOVAT  and  XKTC. 

Second,  in  regard  to  the  summarized  solution  histories  given  at  the 
conclusion  of  each  run,  it  should  be  noted  that  the  energy  defect  calculation 
does  not  presently  support  the  full  chemistry  option.  If  intermediate 
combustion  products  are  present,  the  tabulated  energy  defect  may  become  quite 
large.  Only  the  mass  defect  can  be  depended  upon  to  gage  the  accuracy  of  the 
numerical  solution  in  such  cases.  The  single  exception  to  this  statement  is 
that  of  the  traveling  charge  with  a  finite  flame  thickness.  In  this  special 
case,  where  there  is  just  one  intermediate  species,  the  energy  defect 
calculation  reflects  the  chemical  energy  stored  in  the  intermediates. 
Moreover,  in  this  special  case,  the  mass  fraction  calculation  for  propellant 
type  three  in  the  summary  table  is  used  to  tabulate  the  ratio  of  the  mass  of 
the  unbumed  intermediates  to  that  of  the  original  traveling  charge  increment. 
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STRUCTURE  AMD  LINKAGES 


A  complete  summary  of  the  routines  and  their  linkages  is  given  in  Table 
A.  1.  The  overall  macrostructure  is  unchanged  from  that  of  XNOVA  as  documented 
by  Gough  (1983b) .  The  following  brief  comments  provide  a  summary  of  the 
routines  which  were  added  to  XNOVA  to  produce  XNOVAK,  the  revisions  which 
subsequently  transformed  XNOVAK  into  XNOVAT,  the  amalgam  of  XNOVAT  and  BRLTC 
(Gough,  1980b)  to  produce  the  previous  version  of  XKTC,  and  the  amalgam  of  XKTC 
and  RLPTC  (Gough,  1988)  to  produce  the  current  version.  We  note  that  the 
current  version  is  intended  for  use  on  32-bit  word  machines  and  is  therefore 
written  in  double  precision. 

Routines  Added  in  Preparation  of  XNOVAK 

XNOVAK  was  developed  as  an  extension  of  XNOVA.  Accordingly,  XNOVA  is  a 
subset  of  both  XNOVAK  and  NOVA.  Moreover,  in  developing  XNOVAK  it  was  found 
necesary  to  restore  certain  capabilities  which  had  been  removed  from  NOVA 
during  the  preparation  of  XNOVA.  Specifically,  we  restored  the  invariant 
embedding  solution  for  the  thermal  response  of  the  solid  propellant.  Thus,  in 
addition  to  the  capabilities  of  XNOVA,  XNOVAK  and  NOVA  also  share  a  transient 
combustion  modeling  capability. 

The  NOVA  routines  restored  to  XNOVAK  were  CMBUST,  FBAK,  IMBED  and  ROOT 
together  with  necessary  I/O  linkages.  The  routines  were  then  modified  to 
support  the  XNOVAK  features  of  subsurface  reactivity  and  the  evaporative 
boundary  condition.  New  routines  added  to  support  the  kinetics  option 
included  CHEMR,  CHEMRS,  CONLOS,  COVC  and  GAMMOL.  The  new  routine  FILLBR 
implements  the  analysis  of  the  rear  filler  elements  and  was  created  by  making 
appropriate  editing  changes  to  the  pre-existing  routine  FILLER.  One  addition¬ 
al  routine,  AVN,  was  included  for  the  purpose  of  documenting  Code  revisions  and 
printing  the  version  number  on  each  run. 

Routines  Added  in  Preparation  of  XNOVAT 

Several  routines  were  required  to  produce  XNOVAT.  Subroutine  INTRPC 
determines  the  rate  of  combustion  of  the  reactive  layers  ascribed  to  the  tube 
wall,  the  centerline,  and  the  projectile  afterbody.  To  support  the  new  form 
functions  we  have  added  the  routines  BLSL,  HEX19,  and  SLIVER.  To  treat  the 
reactivity  and  flow  resistance  of  the  endwalls  of  the  bundles  of  propellant  we 
added  the  routines  CALFLO,  CALPRM,  FLUX,  FLUXDR  and  TDBCAL,  all  of  which  were 
adapted  from  the  TDNOVA  Code  (Gough,  1983c)  .  The  routine  TDBUF  acts  as  a  link 
between  the  existing  boundary  value  solver  BCAL  and  the  routine  TDBCAL.  In 
addition  we  added  the  routines  JCON,  SETSUB  and  RCASE  which  perform  various 
utility  functions. 
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Structure  of  NOVATC 


XKTC  was  essentially  formed  by  substituting  XNOVAT  in  place  of  XNOVA  in 
the  previously  developed  NOVATC  Code  (Gough,  1983a) .  As  we  have  previously 
discussed,3  NOVATC  is  an  amalgam  of  XNOVA  and  BRLTC  (Gough,  1980b,  1983b). 

In  forming  the  amalgam  care  was  taken  to  minimize  cross-contamination  of 
the  coding.  The  approach  was  to  take  BRLTC  and  delete  all  references  to  the 
flow  behind  the  base  of  the  traveling  charge  while  retaining  the  storage,  data 
reads  and  processing  pertinent  to  the  regression  of  the  surface,  the  traveling 
charge  and  the  projectile.  This  stripped  down  code  was  linked  to  a  complete 
version  of  XNOVA  (Gough,  1983b)  in  which  a  minimal  number  of  linking  subroutine 
calls  were  placed.  Although  a  more  tightly  written  code  could  have  been 
developed  it  would  have  been  more  difficult  to  maintain  such  a  code  in  a  form 
compatible  with  future  versions  of  XNOVA  and  BRLTC.  Also,  it  is  the  case  that 
XNOVA  and  BRLTC  have  many  variables  whose  Fortran  names  are  identical,  but 
whose  meanings  differ  and,  conversely,  some  variables  with  different  names  but 
identical  meanings. 

It  will  be  noted  in  Table  A.  1  that  all  routines  pertinent  to  the 
traveling  charge  have  the  prefix  TC.  A  single  routine,  TCLINK,  has  the 
function  of  reconciling  the  storage  conventions  of  the  two  codes  and  of  passing 
data  between  them.  Processing  follows  the  usual  NOVA  conventions  with  the 
traveling  charge  logic  activated  at  a  number  of  places.  NOVSUB  calls  TCDATA 
and  TCLINK  to  read  and  initialize  data.  INTEG  calls  TCLINK,  TCOUT  to  print  the 
solutions  and  TCBR4  to  determine  the  traveling  charge  time  step  constraint. 
INTAL  calls  TCLINK  and  TCXC,  the  main  integration  executive  for  the  traveling 
charge.  TABLES  calls  TCLINK.  It  was  also  necessary  to  restructure  slightly 
the  routines  BCAL  and  BDMOV . 

Routines  Added  in  Preparation  of  Previous  Version  of  XKTC 

The  approach  followed  in  the  development  of  NOVATC  made  the  replacement 
of  XNOVA  by  XNOVAT  fairly  straightforward.  It  should  be  noted,  however,  that 
the  present  effort  involved  substantial  exercising  of  the  algorithm  and  several 
revisions  were  made  to  the  analysis  of  the  boundary  values  at  the  base  of  the 
burning  traveling  charge.  Accordingly,  the  versions  of  TCLINK  and  TCBASE  used 
here  differ  from  those  in  earlier  versions  of  NOVATC. 

Apart  from  linking  the  kinetics,  tank  gun  and  traveling  charge  options 
in  a  physically  complete  fashion,  it  was  necessary  to  add  several  new  routines 
in  the  development  of  XKTC.  Subroutine  GETLS  computes  the  values  of  L'  for  the 
intermediate  products  of  combustion  of  the  traveling  charge.  ATACH  enforces 
the  attachment  of  a  propellant  type  to  the  tube  or  to  the  projectile. 
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Routines  Added  in  Preparation  of  Present  Version  of  XKTC 


The  revisions  described  in  the  main  body  of  the  present  report  have  not 
entailed  the  addition  of  many  new  subroutines.  Subroutines  EXCW,  FRACT  and 
REG21A  have  been  added  to  support  the  explicit  analysis  of  an  intergranular 
shock  wave  and  the  effects  of  grain  fracture.  The  bulk  of  the  new  routines 
have  been  required  in  order  to  effect  the  amalgam  with  the  RLPTC  Code  to 
support  the  modeling  of  charges  with  a  traveling  liquid  propellant  component. 
The  approach  to  the  amalgam  with  RLPTC  was  perfectly  analogous  to  that 
described  above  in  connection  with  BRLTC.  The  RLPTC  routines  added  to  XKTC  are 
all  prefaced  with  the  letters  TLC.  Gough  (1988)  may  be  consulted  for  a  table 
indicating  the  precise  correspondence  between  the  TLC  -  routines  and  their  RLPTC 
counterparts.  A  new  routine  TLCLNK  performs  the  task  of  linking  the  TLC 
storage  with  that  of  XKTC. 

Finally,  we  note  that  the  present  version  of  XKTC  includes  those 
revisions  made  for  the  Navy  to  permit  the  modeling  of  inbore  rockets  (Gough, 
1986b)  and  a  linkage  to  the  plasma  model  of  Powell  and  Zielinsky  (1992) . 

DESCRIPTION  OF  INPUT  FILES 

We  preface  the  detailed  description  of  the  input  file  structure  with  some 
general  observations.  We  note,  in  particular,  the  nomenclature  for  the 
definition  of  the  geometry  of  the  propelling  charge. 

Figure  A.l  illustrates  a  charge  configuration  with  does  not  make  use  of 
the  tank  gun  option  (MODET  =  0)  .  We  illustrate  the  base  of  the  projectile,  an 
arbitrary  number  of  filler  elements  —  some  at  the  rear  and  some  at  the  front 
of  the  charge  —  and  two  types  of  propellant,  the  first  of  which  is  in  two 
increments,  the  latter  increment  overlapping  that  of  the  second  propellant. 
The  figure  also  illustrates  the  significance  of  the  input  data  ZGR,  XEL,  XBL 
and  ZBPR . 

Figure  A.  2  illustrates  a  charge  configuration  which  does  make  use  of  the 
tank  gun  option  (MODET  =  1)  .  We  illustrate  the  intrusion  of  the  projectile 
afterbody  into  the  combustion  chamber,  the  reactive  layers  on  the  tube  wall, 
the  centerline  and  the  projectile  afterbody,  and  three  types  of  propellant,  the 
first  of  which  is  present  as  two  increments.  To  the  rear  of  the  afterbody  we 
represent  the  three  types  of  propellant  as  being  parallel  packaged  and  we 
illustrate  the  significance  of  the  input  data  RGRI  and  RGRO. 

Figures  A.l  and  A. 2  both  assume  that  the  propellant  is  of  the  conven¬ 
tional  type.  Figure  A. 3  illustrates  a  charge  configuration  in  which  a  solid 
propellant  traveling  charge  is  present.  We  note  that  the  traveling  charge  may 
consist  of  several  increments,  each  having  distinct  mechanical  and  thermo¬ 
chemical  properties.  The  simulation  of  the  traveling  charge  may  be  performed 
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Figure  A. 3  Example  of  a  Hybrid  Charge  Consisting  of  Conventional  and 
Traveling  Charge  Increments. 


in  conjunction  with  an  arbitrarily  configured  conventional  charge.  It  is 
assumed,  however,  that  when  the  traveling  charge  is  present  there  are  no 
compactible  filler  materials  at  the  front  of  the  chamber,  as  in  Figure  A.l,  and 
that  the  projectile  does  not  have  an  afterbody  as  in  Figure  A. 2.  Reactive 
sidewalls  may  nevertheless  be  present,  as  shown  in  Figure  A. 3. 

Figure  A. 4  illustrates  a  charge  configuration  in  which  a  liquid 
propellant  traveling  charge  is  present.  The  solid  propellant,  booster  is 
permitted  to  take  any  of  the  configurations  compatible  with  the  solid 
propellant  traveling  charge.  Figure  A. 4  shows  a  projectile  with  an  afterbody 
which  stabilizes  the  traveling  liquid  charge  and  allows  the  propellant  to  vent 
at  the  rear  face.  In  the  representation  of  Figure  A. 4  it  is  tacitly  assumed 
that  the  discharged  liquid  propellant  is  fully  burned  within  a  negligibly  short 
time  so  that  the  mass  transferred  to  the  booster  region  consists  of  final 
products  of  combustion.  Gough  (  1988)  may  be  consulted  for  further  details. 

Input  to  XKTC  consists  of  XNOVAT  data  followed  by  a  subset  of  the  BRLTC 
data  base  when  the  solid  propellant  traveling  charge  option  is  selected  in  the 
control  data  field  of  XKTC  and  by  a  subset  of  the  RLPTC  data  base  when  the 
liquid  propellant  traveling  charge  option  is  exercised.  Tables  A. 2,  A. 3,  A. 4 
and  A. 5  enumerate  the  "Mandatory",  Contingent,  Traveling  Charge  and  Traveling 
Liquid  Charge  data  files.  The  files  prefixed  with  an  M  a’re  always  mandatory 
in  XNOVAT.  Here,  File  [M13]  is  optional.  We  have  retained  the  file  labels  of 
XNOVAT,  in  spite  of  this  minor  inconsistency,  to  promote  commonality  among  the 
various  codes. 

The  enumeration  of  the  M  and  C  files  follows  that  for  the  NOVA  Code.  We 
have  attempted  to  maximize  the  compatibility  of  XKTC,  XNOVAT,  XNOVAK,  XNOVATC, 
XNOVA  and  NOVA  data  bases.  As  noted  in  the  introduction  to  this  appendix, 
compatibility  is  complete  with  the  possible  exception  of  File  [M4]  .  In  XKTC, 
XNOVAT  and  XNOVAK,  File  [M4]  always  consists  of  two  cards.  In  XNOVATC,  XNOVA 
and  NOVA  it  may  consist  of  either  one  or  two  cards.  Existing  NOVATC,  XNOVA  and 
NOVA  data  sets  for  which  File  [M4]  consists  of  only  one  card  may  be  made 
conpatible  with  XKTC,  XNOVAT  and  XNOVAK  by  the  insertion  of  a  single  blank  card 
after  the  existing  [M4]  data  card.  NOVA  files  not  supported  by  XKTC,  XNOVAT 
and  XNOVAK  are  read  and  subsequently  ignored.  The  tabulation  of  data  by  XKTC 
only  includes  those  elements  which  are  supported. 

All  mandatory  files.  Table  A. 2,  are  common  to  all  codes.  However,  not 
all  the  members  of  every  file  are  supported  by  XKTC,  XNOVAT  and  XNOVAK.  The 
detailed  definition  of  the  input  files  given  in  Table  A.  6  describes  all  the 
elements  which  are  supported  and  simply  denotes  the  others  as  "Inactive." 
Those  contingent  files.  Table  A.  3,  which  are  supported  are  defined  while  the 
others  are  denoted  as  "not  supported."  Only  those  contingent  files  which  are 
supported  by  XKTC  appear  in  the  detailed  discussion  of  Table  A.  6. 
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The  program  input  files  are  structured  to  permit  the  running  of  only  one 
problem  at  a  time.  A  problem  may  be  restarted  from  disc,  provided  suitable 
options  have  been  selected  in  a  prior  run.  Each  problem  may  be  terminated 
according  to  a  criterion  of  number  of  integration  steps,  projectile 
displacement  or  problem  time.  Termination  occurs  at  whichever  of  the  three 
criteria  is  first  satisfied.  However,  if  the  blowdown  option  is  exercised  the 
projectile  displacement  criterion  does  not  serve  to  terminate  the  calculation. 
The  muzzle  is  assumed  to  be  open  when  the  specified  displacement  is  reached  and 
termination  is  subsequently  based  on  number  of  integration  steps,  problem  time, 
or  breech  pressure,  whichever  is  satisfied  first. 

It  should  be  noted  that  file  counters  are  edited  by  subroutine  NOVSUB  to 
establish  their  conformality  with  internal  storage  dimensions.  However,  other 
data  are  not  edited,  and  it  is  recommended  that  the  program  user  perform  a 
first  run  on  a  new  problem  with  termination  set  to  follow  initial  set-up,  so 
that  all  data  may  be  validated. 

The  following  notes  (1)  —  (10)  apply  whether  or  not  the  traveling  charge  option 
is  exercised.  Subsequent  notes  (11)  —  (16)  pertain  to  the  traveling  charge 
option.  Note  (17)  applies  to  the  inbore  rocket  motor  option.  Notes  18  and  19 
apply  to  the  traveling  liquid  charge  option. 

(1)  For  problems  involving  only  granular  propellant,  the  representations  of 
the  grain  distributions  are  arbitrary.  The  granular  propellants  may  doubly  or 
triply  overlap.  However,  a  region  occupied  by  stick  propellant  may  not  be 
shared  by  any  other  type  unless  MODET  =  1.  If  MODET  =  1,  it  is  permissible  to 
have  an  increment  of  stick  propellant  parallel  packaged  with  another  increment 
of  stick  or  granular  propellant.  The  monolithic  charge  is  not  permitted  to 
share  a  cross-section  of  the  tube  with  any  other  type.  if  a  given  type  is 
specified  as  bonded  to  the  tube  or  projectile,  the  bonding  will  be  presumed  to 
apply  to  any  other  propellant  which  shares  a  region  with  the  given  type. 

(2)  The  mode  of  representation  of  one  type  of  propellant  is  independent  of  the 
mode  of  representation  of  any  other.  If  tables  of  volume  fractions  are  used, 
it  should  be  recalled  that  the  volume  fraction  is  the  complement  of  the 
porosity,  being  zero  when  no  propellant  is  present  and  increasing  to  unity  as 
the  pore  volume  vanishes.  The  volume  fraction  defaults  to  zero  outside  the 
range  of  positions  defined  by  the  tables. 

(3)  An  internal  boundary  is  identified  at  any  location  in  which  any  volume 
fraction  is  discontinuous.  Thus  an  internal  boundary  may  be  established  at  a 
point  at  which  the  porosity  is  continuous. 
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(4)  Absolutely  no  restrictions,  other  than  that  on  note  (1),  are  placed  on  the 
relative  positions  of  the  bags  of  propellant.  After  the  data  are  read,  they 
are  all  converted  internally  to  volume  fraction  tables.  These  are  all  then 
scanned  to  create  a  list  of  internal  boundary  positions.  This  list  is  then 
sorted  to  put  them  into  order  and  to  define  the  computational  regions. 

(5)  The  right-hand  boundary  is  always  set  equal  to  XEL(l)  .  If  NEL  =  0,  XEL(l) 
defaults  to  ZBPR.  Similarly,  the  left-hand  boundary  is  always  set  equal  to 
XBL(l).  If  NBL  “  0,  XBL(l)  defaults  to  zero.  It  should  be  noted  that  the 
configuration  of  the  forward  elements  is  specified  by  reference  to  the  position 
of  the  left-hand  or  rear  boundary  of  each  element.  Conversely,  the 
configuration  of  the  rear  elements  is  specified  by  reference  to  the  position 
of  the  right-hand  or  forward  boundary  of  each  element.  In  both  cases  the 
elements  are  ordered  so  that  the  first  is  closest  to  the  propelling  charge. 

(6)  Although  filler  elements  may  be  included  if  MODET  =  1,  the  coding  does  not 
consider  the  influence  of  the  afterbody  on  the  behavior  of  the  filler  elements. 

(7)  It  is  emphasized  that  every  case  closure  element  must  be  accounted  for, 
including  spaces.  Any  element,  other  than  the  first,  may  be  entered  as  a  space 
by  setting  its  mass  equal  to  zero. 

(8)  It  is  noted  that  one  may  use  a  single  element  to  represent  more  than  one 
physical  component  and  that  conversely,  one  may  use  several  elements  to 
characterize  a  single  component. 

(9)  The  present  storage  allocation  in  the  code  imposes  certain  restrictions 
on  the  modeling  of  subsurface  reactions  in  the  propellant.  It  is  assumed  that 
only  one  type  of  propellant  is  present  if  an  invariant  embedding  solution  of 
the  thermal  response  is  desired  (KMODE  =  2  in  File  [M2] )  .  At  most  21  stations 
are  permitted  for  the  analysis  of  the  thermal  response.  At  most  two  chemical 
species  can  be  associated  with  the  subsurface  chemistry.  While  these  limits 
are  thought  to  be  adequate  for  present  needs,  they  may  readily  be  relaxed  by 
means  of  changes  in  certain  dimension  statements. 

(10)  It  will  be  noted  that  the  data  required  when  KMODE  *  0  Files  [C23.1]  - 
[C23.6]  are  to  some  extent  already  provided  by  the  data  of  Files  [M7]  -[C7]. 
The  latter  data  are  superseded  in  such  a  case  and  consistency  between  the  two 
sets  of  data  is  not  essential.  However,  inconsistencies  may  yield  an  apparent 
energy  defect  in  the  summarized  interior  ballistics  table. 

(11)  Unit  9  is  reserved  for  storage  of  the  traveling  charge  data  if  disk 
logout  is  specified. 
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(12)  The  code  does  not  support  the  traveling  charge  option  simultaneously  with 
the  compactible  case  closure  option.  It  is  also  assumed  that  the  projectile 
has  no  afterbody  if  the  traveling  charge  option  is  exercised. 

(13)  The  code  termination  data  are  always  specified  according  to  the  NOVA 
format.  The  projectile  data  follow  the  NOVA  format  only  if  the  traveling 
charge  option  is  not  in  effect. 

(14)  Due  to  the  cross-linking  of  the  codes,  no  more  than  KQ-2  mesh  points  and 
no  more  than  9  increments  can  be  specified  for  the  booster  region  when  the 
traveling  charge  option  is  in  effect.  Here  KQ  is  the  dimension  of  the  XKTC 
storage  arrays,  currently  set  equal  to  999  by  a  PARAMETER  statement. 

(15)  A  composition  dependent  covolume  is  not  considered.  The  covolume  for  the 
calculation  is  presently  based  on  the  booster  charge  data  according  to  the  NOVA 
convention. 

(16)  The  gun  tube  is  assumed  to  have  a  constant  area  in  the  region  occupied 
by  the  unreacted  traveling  charge. 

(17)  If  an  inbore  rocket  motor  is  present  it  is  assumed  that  there  are  no 
forward  filler  elements,  that  the  projectile  has  no  afterbody  and  that  no 
booster  increments  are  attached  to  the  projectile. 

(18)  The  base  of  the  traveling  liquid  charge  is  assumed  to  be  permeable  to  the 
gas-phase  if  a  cavity  is  present,  but  impermeable  to  the  solid  propellant 
booster  charge. 

(19)  A  region  of  ullage  is  assumed  to  exist  at  all  times  between  the  booster 
charge  and  the  base  of  the  traveling  liquid  charge.  It  is  therefore 
recommended  that  the  input  datum  RZOLV  be  less  than  or  equal  to  0.01.  See  the 
discussion  of  File  [M3]  in  Table  A. 6. 


66 


REFERENCES  CITED  IN  APPENDIX  A 


Gough,  P.S.  "The  NOVA  Code:  A  User's  Manual" 

Indian  Head  Contract  Report  IHCR-80-8 

Gough,  P.S.  "A  Model  of  the  Traveling  Charge” 

Ballistic  Research  Laboratory  Contract  Report  ARBRL-CR-00432 

Gough,  P.S.  "Extensions  to  NOVA  Flamespread  Modeling 
Capacity"  PGA-TR-81-2 

Gough,  P.S.  "A  Two- Phase  Model  of  the  Interior  Ballistics 
of  Hybrid  Solid-Propellant  Traveling  Charges" 

Final  Report,  Task  I,  Contract  DAAK11-82-C-0154 

Gough,  P.S.  "XNOVA  -  An  Express  Version  of  the  NOVA  Code" 
Final  Report,  Contract  N00174-82-M-8048 

Gough,  P.S.  "Modeling  of  Rigidized  Gun  Propelling  Charges" 
Contract  Report  ARBRL-CR-00518 

Gough,  P.S.  "Theoretical  Modeling  of  Navy  Propelling 
Charges"  Final  Report,  Contract  N00174-83-C-0241,  PGA-TR-84-1 

Gough,  P.S.  "XNOVAT  -  A  Two-Phase  Flow  Model  of  Tank  Gun 
Interior  Ballistics" 

Final  Report,  Task  Order  I,  Contract  DAAK11-85-D-0002 

Gough,  P.S.  "The  XNOVAKTC  Code"  Final  Report,  Task  Order  II, 
Contract  DAAK11-85-D-0002,  PGA-TR-86-1 

Gough,  P.S.  "Theoretical  Modeling  of  Interior  Ballistic 
Phenomena  in  Navy  Guns" 

Final  Report,  Contract  N00174-84-C-0242,  PGA-TR-86-2 

Gough,  P.S.  "Continuum  Modeling  of  Regenerative  Liquid 
Propellant  Guns  and  Hybrid  Traveling  Charge  Systems" 

Final  Report,  Contract  DAAK11-84-C-0080,  PGA-TR-88-1 

Powell,  J.D.  and  Zielinsky,  A.E.  "Theory  and  Experiment  for 
an  Ablating  -  Capillary  Discharge  and  Application  to 
Electrothermal  -Chemical  Guns" 

Ballistic  Research  Laboratory  Technical  Report  BRL-TR-3355 


1980a 

1980b 

1981 

1983a 

1983b 

1983c 

1984 

1985 

1986a 

1986b 

1988 

1992 


67 


TABLE  A.l  SUMMARY  OF  ROUTINES  AND  LINKAGES 


XKTC 

Purpose 

XKTC  is  a  dummy  main  routine  which  immediately 
transfers  control  to  NOVSUB. 

Calls: 

NOVSUB. 

Called  by: 

None. 

AFTSET 

Purpose: 

Subroutine  AFTSET  performs  region  management  in  the 
case  when  the  base  of  the  afterbody  of  the  projectile 
is  represented  as  an  explicit  discontinuity. 

Calls: 

OUTPUT. 

Called  by: 

MESH/  NOVSET. 

ATACH 

Purpose: 

Subroutine  ATACH  enforces  the  attachment  of  a  charge 
increment  to  either  the  tube  or  the  projectile. 

Calls: 

None. 

Called  by: 

INTAL. 

AVN 

Purpose: 

Subroutine  AVN  is  used  to  document  code  revisions 
and  print  the  version  number. 

Calls : 

None. 

Called  by: 

NOVSUB. 

BCAL 

Purpose: 

Subroutine  BCAL  accepts  trial  boundary  values  for 
the  gas-  and  solid-phases  and  adjusts  them  so  as  to 
satisfy  simultaneously  the  physical  and  character¬ 
istic  boundary  conditions. 

Calls: 

COVC,  EPTOR,  EXCW,  GAMMOL,  GRLOAD,  LUMPS,  OUTPUT, 
PRTOC,  PRTOE ,  RHEO,  TABLES,  TDBUF . 

Called  by: 

INTAL. 

BDMOV 

Purpose: 

Subroutine  BDMOV  updates  the  position  of  the  region 
boundaries.  It  also  updates  the  projectile 
displacement  and  velocity,  making  use  of  FILLER 
and/or  FILLBR  when  case  closure  elements  are  present. 

Calls: 

EXCW,  FILLBR,  FILLER,  FRATE,  GMOVE,  RCASE,  RESFUN, 
RHEO. 

Called  by: 

INTAL,  OUTPUT,  TABLES. 

BLKDAT 

Purpose: 

BLKDAT  performs  block  data  initialization. 

Calls: 

None. 

Called  by: 

None. 
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BLSL 

Purpose: 

Subroutine  BLSL  computes  the  volume  and  surface 
area  for  the  blind  slit  form  function  during  the 
slivering  phase* 

Calls: 

None. 

Called  by: 

FORM. 

BRNOUT 

Purpose: 

Subroutine  BRNOUT  detects  the  instant  when  all  the 
propellant  has  been  consumed  and  then  consolidates 
all  the  computational  regions  into  a  single  region 
with  uniform  mesh  spacing. 

Calls: 

FITSP,  REG21 . 

Called  by: 

None. 

CALEOS 

Purpose: 

Subroutine  CALEOS  calculates  specific  heats  and 
enthalpy  according  to  formulation  of  NASA  SP-273. 

Calls: 

None. 

Called  by: 

EPTOR,  ERTOP,  FRICT,  HEATP,  HEATW,  INTAL,  INTRPC, 
LUMPS,  NOVSET,  NOVSUB,  PRTOE . 

CALFLO 

Purpose: 

Subroutine  CALFLO  computes  the  rate  of  reaction  of 
the  surface  fluxes  associated  with  the  endwalls  of 
the  charge  increments. 

Calls : 

None. 

Called  by: 

TDBUF . 

CALPRM 

Purpose: 

Subroutine  CALPRM  computes  the  flow  resistance  co¬ 
efficient  for  the  endwalls  of  the  charge  increments. 

Calls : 

None. 

Called  by: 

TDBUF. 

CHEMR 

Purpose: 

Subroutine  CHEMR  computes  the  effects  of  chemical 
reactions  on  the  species  mass  fractions  in  the 
combustion  product  mixture  and  returns  the  value  of 
the  heat  liberated  by  chemical  reaction. 

Calls: 

None. 

Called  by: 

INTAL,  LUMPS. 

CHEMRS 

Purpose: 

Subroutine  CHEMRS  performs  a  function  similar  to 
that  of  CHEMR;  however  it  addresses  the  reactions 
within  the  solid  propellant. 

Calls: 

None. 

Called  by: 

IMBED. 

69 


CMBUST 


CONLOS 


COVC 


DPDER 


DPDRE 


EPTOR 


ERTOP 


EXCW 


Purpose: 

Subroutine  CMBUST  interfaces  the  invariant  embedding 
solution  of  the  solid  propellant  thermal  response 
with  the  macroscopic  two-phase  flow. 

Calls: 

FBAK,  IMBED. 

Called  by: 

INTEG,  NOVSET. 

Purpose: 

Subroutine  CONLOS  computes  the  rate  of  transfer  of 
condensed  species  from  the  combustion  product  mixture 
to  the  surface  of  the  solid  propellant. 

Calls: 

None. 

Called  by: 

HEATP. 

Purpose: 

Function  COVC  computes  the  covolume  of  the  combustion 
product  mixture. 

Calls: 

None. 

Called  by: 

BCAL,  FRICT,  HEATP,  HEATW,  INTAL,  INTEG,  INTRPC, 

LUMPS,  REG12,  REG32,  STATES,  TCLINK,  TDBCAL,  TDBUF. 

Purpose: 

Function  DPDER  computes  the  partial  derivative 
(Sp/3e)p  for  the  covolume  equation  of  state. 

Calls : 

None. 

Called  by: 

LUMPS . 

Purpose: 

Function  DPDRE  computes  the  partial  derivative 
(dp/Sp)e  for  the  covolume  equation  of  state. 

Calls: 

None. 

Called  by: 

LUMPS. 

Purpose: 

Function  EPTOR  evaluates  the  density  as  a  function 
of  internal  energy  and  pressure  for  the  covolume 
equation  of  state. 

Calls: 

CALEOS. 

Called  by: 

BCAL,  FRICT,  HEATP,  HEATW,  INTRPC,  NOVSET,  TDBCAL, 
TLCBCL,  TLCBCX,  TLCINT,  TLCLPV. 

Purpose: 

Function  ERTOP  evaluates  the  pressure  as  a  function 
of  internal  energy  and  density  for  the  covolume 
equation  of  state. 

Calls: 

CALEOS. 

Called  by: 

INTAL,  LPVB,  LUMPS,  NOVSET,  REG12,  REG32,  TLCLPV. 

Purpose: 

Subroutine  EXCW  computes  the  state  of  the  solid- 
phase  after  passing  through  a  granular  shock  wave. 

Calls: 

GRLOAD . 

Called  by: 

BCAL,  BDMOV . 
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FBAK 


FILLBR 


FILLER 


FITSP 


FLUX 


FLUXDR 


FORM 


Purpose: 


Calls : 
Called  by: 


Function  FBAK  computes  the  temperature  gradient  at 
the  surface  of  the  solid  propellant  taking  into 
account  heat  transfer  from  the  igniter  and  heat 
feedback  from  the  flame. 

None. 

CMBUST,  NOVSET. 


Purpose: 

Calls : 
Called  by: 


Subroutine  FILLBR  updates  the  motion  of  the  rear  case 
closure  elements. 

OUTPUT,  TABLES. 

BDMOV,  NOVSET. 


Purpose:  Subroutine  FILLER  updates  the  motion  of  the  forward 

case  closure  elements  and  the  projectile. 

Calls:  OUTPUT,  TABLES. 

Called  by:  BDMOV,  NOVSET. 


Purpose: 


Calls: 
Called  by: 


Subroutine  FITSP  sets  values  of  the  state  variables, 
following  re-allocation  of  the  mesh,  by  means  of  a 
cubic  spline  interpolation  scheme. 

None. 

BRNOUT,  MESH,  NOVSET. 


Purpose: 

Calls: 
Called  by: 


Subroutine  FLUX  computes  the  state  of  gas  at  the 
boundaries  of  the  reactive  endwalls. 

None. 

FLUXDR,  TDBCAL. 


Purpose: 


Calls : 
Called  by: 


Subroutine  FLUXDR  computes  the  derivatives  of  the 
state  variables  in  a  lumped  parameter  region  with 
respect  to  the  fluxes  to  that  region  from  the 
contiguous  continuum  regions. 

FLUX. 

TDBUF . 


Purpose: 


Calls : 
Called  by: 


Subroutine  FORM  computes  the  surface  area  and  volume 
of  the  propellant  grains.  It  is  supported  by  PERF19 
which  treats  the  slivering  phase  of  nineteen 
perforation  propellant. 

BLSL,  HEX19 ,  PERF19 . 

INTEG,  NOVSET. 
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FORMCR 


FRACT 


FRATE 


FRICT 


GAMMOL 


GETLS 


GMOVE 


GRLOAD 


Purpose:  Subroutine  FORMCR  is  effectively  a  subset  of  FORM 

and  is  used  to  support  subroutine  LPVB  as  a  modular 
package. 

Calls:  None. 

Called  by:  LPVB,  TLCLPV. 


Purpose:  Subroutine  FRACT  determines  the  effects  of  grain 

fracture. 

Calls:  None. 

Called  by:  INTEG,  NOVSET. 


Purpose:  Function  FRATE  computes  the  steady  flow  through  a 

nozzle  using  the  covolume  equation  of  state. 

Calls:  None. 

Called  by :  BDMOV ,  LPVB . 


Purpose: 

Calls: 
Called  by: 


Subroutine  FRICT  computes  the  interphase  drag  for 
granular  propellant. 

CALEOS,  COVC,  EPTOR,  VIS. 

INTEG. 


Purpose:  Subroutine  GAMMOL  computes  the  ratio  of  specific 

heats  and  the  molecular  weight  of  the  combustion 
product  mixture. 

Calls:  None. 

Called  by:  BCAL,  LUMPS,  STATES,  TCLINK,  TDBCAL,  TDBUF . 


Purpose: 


Calls: 


★ 

Subroutine  GETLS  computes  L  values  for  the 
intermediate  combustion  products  of  the  traveling 
charge. 

None. 


Called  by:  INTAL,  INTEG. 


Purpose:  Subroutine  GMOVE  updates  the  motion  of  the  gun  tube 

when  the  recoil  option  is  exercised. 

Calls:  None. 

Called  by :  BDMOV . 

Purpose:  Subroutine  GRLOAD  computes  the  nominal  loading  curve 

for  granular  propellant. 

Calls:  None 

Called  by:  BCAL,  EXCW,  INTAL,  RHEO. 
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HEATP 


HEATW 


HEX19 


IGNITE 


IMBED 


INTAL 


Purpose: 


Calls : 
Called  by: 


Subroutine  HEATP  determines  the  interphase  heat 
transfer/  updates  the  surface  temperature  of  the 
solid-phase  prior  to  ignition,  and  also  determines 
the  interphase  drag  in  stick  propellant. 

CALEOS,  CONLOS,  COVC,  EPTOR/  VIS. 

INTEG. 


Purpose:  Subroutine  HEATW  determines  the  rate  of  heat  transfer 

to  the  tube  wall  and  updates  the  tube  surface 
temperature . 

Calls:  CALEOS,  COVC,  EPTOR,  VIS. 

Called  by:  INTEG,  NOVSET. 


Purpose: 

Calls: 
Called  by: 

Purpose: 

Calls: 
Called  by: 


Subroutine  HEX 19  computes  the  volume  and  surface 
area  of  nineteen-perforation  hexagonal  grains. 

SLIVER. 

FORM. 


Subroutine  IGNITE  determines  the  time  of  ignition 
of  the  propellant. 

None. 

INTEG. 


Purpose:  Subroutine  IMBED  integrates  the  thermal  profile  in 

the  solid  propellant  by  means  of  the  method  of 
invariant  embedding. 

Calls:  CHEMRS,  FBAK,  ROOT,  ROOTR. 

Called  by:  CMBUST,  NOVSET. 


Purpose: 


Calls: 


Called  by: 


Subroutine  INTAL  updates  the  principal  state 
variables,  p,  p,  u,  c,  Up,  o  at  all  interior  mesh 
points.  It  also  determines  trial  update  boundary 
values  together  with  characteristic  coefficients 
which  are  transmitted  to  BCAL  for  imposition  of  the 
physical  boundary  conditions. 

ATACH,  BCAL,  BDMOV,  CALEOS,  CHEMR,  COVC,  ERTOP, 
GETLS,  GRLOAD,  INTRP1,  LPVB,  PRTOC,  PRTOE ,  RCASE, 
RDEDPR,  RHEO,  TCLINK,  TCXC,  TLCLNK,  TLCXC. 

INTEG. 
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INTEG 


Purpose:  Subroutine  INTEG  is  the  principal  integration 

executive.  It  is  cycled  twice  per  time  step,  once 
for  the  predictor  level  and  once  for  the  corrector 
level.  It  establishes  the  constitutive  data  by  calls 
to  individual  subroutines  and  effects  the  update  of 
the  principal  state  variables  by  a  call  to  INTAL. 
INTEG  itself  updates  the  surface  regression  and 
thermal  parameter  H  for  the  solid-phase  and,  if 
KMODE  =  0  (File  [M2]  of  Table  A. 4),  it  also  updates 
the  molecular  weight  and  ratio  of  specific  heats  for 
the  gas  phase. 


Calls : 

CMBUST,  COVC,  FORM,  FRACT,  FRICT,  GETLS,  HEATP, 
HEATW,  IGNITE,  INTAL,  INTRP1,  INTRP2,  INTRPC,  JCON, 
MESH,  OUTPUT,  PRTOC,  REGRES,  STATES,  TABLES,  TCBR4 , 
TCLINK,  TCOUT,  TERMIN,  TLCGDT,  TLCLNK,  TLCMSH, 
TLCOUT,  VOIDS,  WALTEM. 

Called  by: 

NOVSET . 

INTRP1 

Purpose: 

Subroutine  INTRP1  determines  the  cross-sectional 
area  of  the  tube  at  each  mesh  point,  including  an 
allowance  for  the  unburned  portion  of  the  primer. 

Calls : 

JCON. 

Called  by: 

INTAL,  INTEG,  MESH,  NOVSET,  TABLES. 

INTRP2 

Purpose: 

Subroutine  INTRP2  computes  the  rate  of.  discharge  of 
the  igniter  at  each  mesh  point. 

Calls : 

PLASMA. 

Called  by: 

INTEG,  MESH,  NOVSET. 

INTRPC 

Purpose: 

Subroutine  INTRPC  computes  the  local  mass  addition 
due  to  combustion  of  the  reactive  sidewalls. 

Calls: 

CALEOS,  COVC,  EPTOR,  JCON,  RCASE,  VIS. 

Called  by: 

INTEG,  MESH,  NOVSET. 

JCON 

Purpose: 

Function  JCON  locates  the  nearest  continuum  mesh 
point . 

Calls: 

None. 

Called  by: 

INTEG,  INTRP1,  INTRPC,  LUMPS. 

LPDATA 

Purpose: 

Subroutine  LPDATA  converts  the  XNOVA  data  base  into 
an  equivalent  data  base  for  a  lumped  parameter 
interior  ballistic  model. 

Calls : 

None. 

Called  by: 

NOVSET . 
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LPVB 


LUMPS 


MESH 


NOVSET 


NOVSUB 


OUTPUT 


Purpose: 

Subroutine  LPVB  provides  a  lumped  parameter  analysis 
of  a  control  volume  which  undergoes  mass  transfer 
with  some  external  ambient. 

Calls: 

ERTOP,  FORMCR,  FRATE . 

Called  by: 

INTAL,  NOVSET. 

Purpose: 

Subroutine  LUMPS  provides  a  trial  update  of  the 
state  of  all  lumped  parameter  regions.  It  also 
computes  derivatives  of  the  state  variables  with 
respect  to  the  mass  fluxes  to  the  lumped  parameter 
region.  These  are  used  by  BCAL  to  enforce  the 
physical  boundary  conditions. 

Calls : 

CALEOS,  CHEMR,  COVC,  DPDER,  DPDRE ,  ERTOP,  GAMMOL, 
JCON,  RCASE . 

Called  by: 

BCAL,  TDBUF . 

Purpose: 

Subroutine  MESH  determines  the  level  of  modeling  of 
each  region  and  assigns  mesh  points  to  the  continuum 
regions  on  the  basis  of  their  relative  sizes. 

Calls: 

AFTSET,  FITSP,  INTRP1,  INTRP2,  INTRPC,  OUTPUT,  REG12, 
REG21,  REG21A,  REG32 ,  SETSUB,  STATES. 

Called  by: 

INTEG,  NOVSET. 

Purpose: 

Subroutine  NOVSET  performs  the  initialization  of 
variables  which  are  not  set  by  BLKDAT. 

Calls : 

AFTSET,  CALEOS,  CMBUST,  EPTOR,  ERTOP,  FBAK,  FILLBR, 
FILLER,  FITSP,  FORM,  FRACT,  HEATW,  IMBED,  INTEG, 
INTRP1,  INTRP2 ,  INTRPC,  LPDATA,  LPVB,  MESH,  REGRES, 
SETSUB,  TABLES,  TCDATA,  TCINIT,  TCLINK,  TLCINP, 
TLCINT,  TLCLNK. 

Called  by: 

NOVSUB. 

Purpose: 

Subroutine  NOVSUB  reads  and  prints  the  input  data 
used  to  define  the  problem. 

Calls: 

AVN,  CALEOS,  NOVSET. 

Called  by: 

XKTC. 

Purpose: 

Subroutine  OUTPUT  is  responsible  for  logout  of  the 
solution  to  the  printer  and/or  direct  access  device 
unit  8. 

Calls: 

BDMOV,  REGRES,  TABLES,  VIS. 

Called  by: 

AFTSET,  BCAL,  FILLBR,  FILLER,  INTEG,  MESH. 
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PERF19 


Purpose :  Subroutine  PERF19  computes  the  surface  area  and 

covolume  of  nineteen-perforation  propellant  during 
the  slivering  phase. 

Calls:  None. 

Called  by:  FORM. 

PGINT  Purpose:  Function  PGINT  performs  truncation  of  a  floating 

point  variable  to  a  fixed  point  variable. 

Calls:  None. 

Called  by:  TABLES. 

PLASMA  Purpose:  Subroutine  PLASMA  computes  the  fluxes  from  a  capillary 

given  the  history  of  current.  It  is  supported  by 
block  data  "atomic"  and  two  subroutines  "mixture" 
and  "zjawja"  which  are  not  described  here.  See  Powell 
and  Zielinsky  (1992)  . 

Calls:  mixture,  zjawja 

Called  by:  INTRP2 

Function  PRTOC  computes  the  square  of  the  speed  of 
sound  according  to  the  covolume  equation  of  state. 
None. 

BCAL,  INTAL,  INTEG,  TDBUF. 


Function  PRTOE  computes  the  internal  energy  from  the 
pressure  and  density  according  to  the  covolume 
equation  of  state. 

None. 

BCAL,  CALEOS,  INTAL,  STATES,  TCLINK,  TDBCAL,  TDBUF, 
TLCBCL,  TCLMSH,  TLCXC. 


Subroutine  RCASE  determines  the  density  of  the  case 
as  a  function  of  pressure. 

None. 

BDMOV,  INTAL,  INTRPC,  LUMPS. 

RDEDPR  Purpose:  Function  RDEDPR  computes  the  quantity  p(6e/5p)p 

according  to  the  covolume  equation  of  state. 

Calls :  None. 

Called  by :  INTAL ,  TLCFDR . 


REG12 


Subroutine  REG12  transforms  data  for  a  region  of 
continuum  ullage  into  data  for  a  region  of  lumped 
parameter  ullage. 

COVC,  ERTOP. 

MESH. 
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REG21 


REG21A 


REG32 


RE GRES 


RESFUN 


RHEO 


ROOT 


ROOTR 


Purpose: 

Subroutine  REG21  transforms  data  for  a  region  of 
lumped  parameter  ullage  into  data  for  a  region  of 
continuum  ullage. 

Calls: 

None. 

Called  by: 

BRNOUT,  MESH. 

Purpose: 

Subroutine  REG21A  transforms  data  for  a  region  of 
lumped  parameter  two-phase  flow  into  data  for  a 
region  of  continuous  two-phase  flow. 

Calls: 

None. 

Called  by: 

MESH. 

Purpose: 

Subroutine  REG32  sets  initial  data  for  a  lumped 
parameter  region  of  ullage  which  is  newly  opened. 

Calls: 

COVC,  ERTOP. 

Called  by: 

MESH. 

Purpose: 

Subroutine  REGRES  computes  the  rate  of  regression 
of  the  surface  of  the  propellant. 

Calls: 

VIS. 

Called  by: 

INTEG,  NOVSET,  OUTPUT. 

Purpose: 

Function  RESFUN  computes  the  resistance  to  projectile 
motion  due  to  interference  of  the  rotating  band  with 
the  gun  tube . 

Calls : 

None. 

Called  by: 

BDMOV . 

Purpose: 

Subroutine  RHEO  computes  the  rate  of  propagation  of 
intergranular  disturbances . 

Calls: 

GRLOAD. 

Called  by: 

BCAL,  BDMOV,  INTAL. 

Purpose: 

Subroutine  ROOT  selects  a  new  value  for  the  solution 
of  an  arbitrary  equation  by  the  method  of  regula 
falsi. 

Calls: 

None. 

Called  by: 

IMBED. 

Purpose : 

Subroutine  ROOTR  is  similar  to  ROOT,  but  contains 
additional  logic  for  the  situation  in  which  the 
slope  of  the  test  function  vanishes. 

Calls: 

None. 

Called  by: 

IMBED. 
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SETSUB 


SLIVER 


STATES 


TABLES 


TCARAC 


TCBASE 


TCBMDC 


Purpose:  Subroutine  SETSUB  sets  the  reactivity  and  perme¬ 

ability  pointers. 

Calls:  None. 

Called  by:  MESH,  NOVSET. 

Purpose:  Subroutine  SLIVER  computes  the  volume  and  surface 

area  of  nineteen-perforation  hexagonal  grains  during 
the  slivering  process. 

Calls:  None. 

Called  by:  HEX19 . 

Purpose:  Subroutine  STATES  computes  certain  of  the  dependent 

state  variables  from  the  principal  storage  arrays  for 
the  gas-phase. 

Calls:  COVC,  GAMMOL,  PRTOE . 

Called  by:  INTEG,  MESH,  TERMIN. 

Purpose:  Subroutine  TABLES  compiles  the  summary  data  which 

describe  the  conventional  interior  ballistic 
quantities  such  as  histories  of  breech  and  base 
pressure  and  of  the  projectile  trajectory. 

Calls:  BDMOV,  INTRP1,  PGINT,  TCLINK,  TLCLNK. 

Called  by:  BCAL,  FILLBR,  FILLER,  INTEG,  NOVSET,  OUTPUT. 

Purpose:  Subroutine  TCARAC  defines  characteristic  data  in 

conjunction  with  the  determination  of  boundary 
values  for  the  traveling  charge  when  modeled  as  a 
continuum. 

Calls:  TCBR2 ,  TCDSDR . 

Called  by:  TCBASE,  TCBPR,  TCONTC. 

Purpose:  Subroutine  TCBASE  determines  the  regression  rate  of 

the  traveling  charge  and  provides  trial  boundary 
values  for  the  unreacted  side. 

Calls:  TCARAC,  TCBURN,  TCDSDR,  TCIG,  TCLINK,  TCPROP, 

TCRESP,  TCRNOM. 

Called  by:  TCXC. 


Purpose:  Subroutine  TCBMDC  computes  mechanical  properties  of 

the  traveling  charge  when  its  rheology  is  specified 
in  tabular  format. 

Calls:  ISCICU  (An  IMSL  routine) . 

Called  by:  TCDATA,  TCDSDR,  TCRNOM,  TCSNOM. 
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TCBPR 


TCBR1 


TCBR2 


TCBR3 


TCBR4 


TCBURN 


TCDATA 


TCDSDR 


Purpose: 

Calls: 
Called  by: 


Subroutine  TCBPR  updates  the  boundary  values  of  the 
traveling  charge  at  the  base  of  the  projectile. 

TCARAC,  TCDSDR,  TCRNOM. 

TCXC. 


Purpose:  Subroutine  TCBR1  initializes  the  computational 

arrays  associated  with  the  traveling  charge. 

Calls:  TCRFIT,  TCRNOM. 

Called  by:  TCINIT. 


Purpose: 


Calls: 
Called  by: 


Subroutine  TCBR2  moves  the  traveling  charge 
computational  arrays  into  working  arrays.  This 
routine  performs  a  trivial  function  in  the  present 
code  but  it  is  retained  in  order  to  maintain 
structural  commonality  with  BRLTC  where  its 
function  is  non- trivial. 

None. 

TCARAC,  TCBR3,  TCBR4,  TCOUT. 


Purpose: 

Calls: 
Called  by: 


Subroutine  TCBR3  updates  the  state  variables  for 
the  traveling  charge  at  all  internal  mesh  points. 

TCBR2 ,  TCDSDR,  TCWFR. 

TCXC. 


Purpose: 

Calls: 
Called  by: 


Subroutine  TCBR4  determines  the  CFL  time  step 
restriction  for  the  traveling  charge. 

TCBR2 ,  TCDSDR,  TCLINK. 

INTEG. 


Purpose: 


Calls: 
Called  by: 


Subroutine  TCBURN  calculates  the  regression  rate  of 
the  traveling  charge  when  specified  as  an  empirical 
function  of  pressure  (on  the  reacted  side)  or  stress 
(on  the  unreacted  side) . 

TCDVDI . 

TCBASE . 


Purpose: 


Subroutine  TCDATA  reads  and  prints  the  input  data 
associated  with  the  traveling  charge. 


Calls:  TCBMDC,  TCINIT. 

Called  by:  NOVSET. 


Purpose: 

Calls: 
Called  by: 


Function  TCDSDR  calculates  the  speed  of  sound  in 
the  traveling  charge. 

TCBMDC,  TCSNOM . 

TCARAC,  TCBASE,  TCBPR,  TCBR3,  TCBR4,  TCONTC. 
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TCDVDI 


TCGETK 


TCIG 


TCINIT 


TCLINK 


TCONTC 


TCOUT 


TCPROP 


Purpose: 

Subroutine  TCDVDI  performs  interpolation  by  the 
method  of  divided  differences. 

Calls: 

None. 

Called  by: 

TCBURN. 

Purpose: 

Subroutine  TCGETK  updates  the  ordinary  differential 
equations  associated  with  the  traveling  charge. 

Calls: 

TCRESP . 

Called  by: 

TCXC. 

Purpose: 

Subroutine  TCIG  determines  the  time  at  which 
ignition  occurs  for  the  traveling  charge. 

Calls: 

None . 

Called  by: 

TCBASE. 

Purpose: 

Subroutine  TCINIT  performs  the  initialization  of 
constants  and  pointers  for  the  traveling  charge. 

Calls: 

TCBR1,  TCRFIT,  TCVUPD. 

Called  by: 

NOVSET ,  TCDATA. 

Purpose: 

Subroutine  TCLINK  transfers  data  between  the  NOVA 
routines  and  the  BRLTC  routines. 

Calls: 

COVC ,  GAMMOL,  PRTOE ,  TCPROP. 

Called  by: 

INTAL,  INTEG,  NOVSET,  TABLES,  TCBASE,  TCBR4,  TCOUT, 
TCXC. 

Purpose: 

Subroutine  TCONTC  updates  the  boundary  values  for 
the  traveling  charge  at  the  interfaces  between 
increments . 

Calls: 

TCARAC,  TCDSDR,  TCRNOM. 

Called  by: 

TCXC. 

Purpose: 

Subroutine  TCOUT  performs  the  logout  of  the 
traveling  charge  state  variables. 

Calls: 

TCBR2,  TCLINK. 

Called  by: 

INTEG. 

Purpose: 

Subroutine  TCPROP  moves  the  traveling  charge 
property  data  from  vector  into  scalar  storage. 

Calls: 

None. 

Called  by: 

TCBASE,  TCLINK. 
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TCRESP 


TCRFIT 


TCRNOM 


TCSCHK 


TCSNOM 


TCVCHK 


TCVUPD 


TCWFR 


Purpose: 


Calls: 
Called  by: 


Subroutine  TCRESP  computes  the  resistance  on  the 
projectile  when  the  traveling  charge  option  is  in 
effect. 

None. 

TCBASE,  TCGETK . 


Purpose: 


Calls: 
Called  by: 


Subroutine  TCRFIT  performs  the  mesh  allocation  for 
the  traveling  charge  and  the  interpolation  of  data 
associated  with  revisions  to  the  number  of  points. 

None. 

TCBR1,  TCINIT,  TCXC. 


Purpose: 


Calls: 
Called  by: 


Function  TCRNOM  computes  the  density  of  the 
traveling  charge  as  a  function  of  pressure  on 
the  nominal  loading  curve. 

TCBMDC. 

TCBASE/  TCBPR,  TCBR1,  TCONTC. 


Purpose: 


Calls: 
Called  by: 


Subroutine  TCSCHK  enforces  the  requirement  that  the 
pressure  in  the  traveling  charge  not  exceed  the 
nominal  loading  value  for  the  current  value  of 
density. 

TCSNOM. 

TCXC. 


Purpose : 


Calls: 
Called  by: 


Function  TCSNOM  computes  the  pressure  in  the 
traveling  charge  as  a  function  of  density  on  the 
nominal  loading  curve. 

TCBMDC. 

TCDSDR,  TCSCHK. 


Purpose: 


Calls: 
Called  by: 


Subroutine  TCVCHK  checks  that  the  velocity  in  the 
traveling  charge  has  not  been  reversed  as  a 
consequence  of  the  friction  term. 

None. 

TCXC. 


Purpose: 


Subroutine  TCVUPD  updates  the  continuum  boundary 
velocities  for  the  traveling  charge. 


Calls:  None. 

Called  by:  TCINIT,  TCXC. 


Purpose:  Subroutine  TCWFR  computes  the  friction  between  the 

traveling  charge  and  the  tube  wall. 

Calls:  None. 

Called  by :  TCBR3 . 
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TCXC 


TCZUPD 


TDBCAL 


TDBUF 


TERMIN 


TLCBCL 


TLCBCX 


TLCFDR 


Purpose: 

Subroutine  TCXC  is  the  integration  executive  for 
the  traveling  charge  state  variables. 

Calls : 

TCBASE,  TCBPR,  TCBR3,  TCGETK,  TCLINK,  TCONTC, 
TCRFIT,  TCSCHK,  TCVCHK,  TCVUPD,  TCZUPD. 

Called  by: 

INTAL. 

Purpose : 

Subroutine  TCZUPD  updates  the  positions  of  the 
continuum  boundaries  associated  with  the  traveling 
charge. 

Calls: 

None. 

Called  by: 

TCXC. 

Purpose: 

Subroutine  TDBCAL  uses  the  physical  boundary 
conditions  and  the  characteristic  forms  to 
determine  the  boundary  values  at  each  time  step. 

Calls: 

COVC,  EPTOR,  FLUX,  GAMMOL,  PRTOE . 

Called  by: 

TDBUF. 

Purpose: 

Subroutine  TDBUF  acts  as  an  interface  from  the  NOVA 
storage  conventions  to  those  of  the  solver  TDBCAL. 

Calls: 

CALFLO,  GALPRM,  COVC,  FLUXDR ,  GAMMOL,  LUMPS,  PRTOC, 
PRTOE,  TDBCAL. 

Called  by: 

BCAL. 

Purpose: 

Subroutine  TERMIN  tests  for  the  termination  of  the 
calculation. 

Calls: 

STATES . 

Called  by: 

INTEG. 

Purpose: 

Subroutine  TLCBCL  enforces  the  physical  boundary 
conditions  associated  with  the  traveling  liquid 
charge. 

Calls: 

EPTOR,  PRTOE,  TLCOUT,  TLCPTR,  TLCSMQ . 

Called  by: 

TLCBCX. 

Purpose: 

Subroutine  TLCBCX  organizes  data  for  TLCBCL. 

Calls : 

EPTOR,  TLCBCL,  TLCFDR,  TLCMIX,  TLCPTR. 

Called  by: 

TLCXC . 

Purpose: 

Subroutine  TLCFDR  evaluates  the  effect  of  a  mass 
flux  on  a  lumped  parameter  region  for  the  traveling 
liquid  charge. 

Calls: 

RDEDPR,  TLCMIX,  TLCPTR. 

Called  by: 

TLCBCX. 
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TLCGAC 


TLCGAS 


TLCGBL 


TLCGDT 


TLCINP 


TLCINT 


TLCLIQ 


TLCLNK 


Purpose:  Subroutine  TLCGAC  computes  flow  areas  associated 

’  with  the  traveling  liquid  charge. 

Calls:  None. 

Called  by:  TLCINT/  TLCMSH,  TLCXC. 


Purpose: 

Calls: 
Called  by: 


Function  TLCGAS  computes  the  speed  of  sound  in  the 
gas-phase  for  the  traveling  liquid  charge. 

None. 

TLCMIX  • 


Purpose: 


Calls: 


Subroutine  TLCGBL  computes  the  total  mass  and 
energy  in  the  regions  defined  by  the  traveling 
liquid  charge. 

TLCPTR. 


Called  by:  TLCINT/  TLCLNK. 


Purpose: 


Subroutine  TLCGDT  computes  the  time  step  constraint 
associated  with  the  traveling  liquid  charge. 


Calls:  TLCMIX. 


Called  by:  INTEG. 


Purpose: 

Calls: 
Called  by: 


Subroutine  TLCINP  reads  the  input  data  for  the 
traveling  liquid  charge. 

None. 

NOVSET. 


Purpose: 

Calls: 
Called  by: 


Subroutine  TLCINT  performs  initialization 
associated  with  the  traveling  liquid  charge. 

EPTOR/  TLCGAC,  TLCGBL,  TLCLPV,  TLCMSH,  TLCPTR. 

NOVSET. 


Purpose: 

Calls: 
Called  by: 


Function  TLCLIQ  computes  the  speed  of  sound  in  the 
liquid  phase  for  the  traveling  liquid  charge. 

TLCPTR. 

TLCMIX. 


Purpose:  Subroutine  TLCLNK  interfaces  the  traveling  liquid 

charge  data  storage  with  the  conventional  XKTC 
storage  arrays. 

Calls:  TLCGBL. 

Called  by:  INTAL,  INTEG,  NOVSET,  TABLES,  TLCUPD. 
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TLCLPV 


TLCLUB 


TLCLUD 


TLCMIX 


TLCMSH 


TLCOUT 


TLCPTR 


TLCRSP 


Purpose: 

Calls: 
Called  by: 


Subroutine  TLCLPV  models  a  two-phase  lumped 
parameter  region  for  the  traveling  liquid  charge. 

EPTOR,  ERTOP,  FORMCR. 

TLCINT,  TLCXC . 


Purpose: 

Calls: 


Subroutine  TLCLUB  is  used  to  perform  matrix 
inversion  for  the  traveling  liquid  charge. 

None. 


Called  by: 


TLCSMQ . 


Purpose: 


Calls: 


Subroutine  TLCLUD  is  used  to  perform  matrix 
inversion  for  the  traveling  liquid  charge. 

None. 


Called  by:  TLCSMQ. 


Purpose: 

Calls: 
Called  by: 


Function  TLCMIX  computes  the  speed  of  sound  in  the 
two-phase  mixture  for  the  traveling  liquid  charge. 

TLCGAS,  TLCLIQ,  TLCPTR. 

TLCBCX,  TLCFDR,  TLCGDT ,  TLCUPD. 


Purpose : 

Calls: 
Called  by: 


Subroutine  TLCMSH  allocates  mesh  storage  for  the 
traveling  liquid  charge. 

PRTOE ,  TLCGAC. 

INTEG,  TLCINT. 


Purpose: 

Calls: 
Called  by: 


Subroutine  TLCOUT  prints  the  solution  in  regions 
occupied  by  the  traveling  liquid  charge. 

TLCSTR . 

INTEG/  TLCBCL. 


Purpose: 


Calls: 
Called  by: 


Function  TLCPTR  computes  the  density  of  the  liquid 
phase  as  a  function  of  pressure  in  the  traveling 
liquid  charge. 

None. 

TLCBCL,  TLCBCX/  TLCFDR/  TLCGBL,  TLCINT,  TLCLIQ, 
TLCMIX,  TLCUPD. 


Purpose: 


Calls: 


Function  TLCRSP  computes  the  resistive  pressure 
acting  on  the  projectile  when  a  traveling  liquid 
charge  is  modeled. 

None. 


Called  by: 


TLCUPD. 
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TLCRTP 


TLCSMQ 


TLCSTR 


TLCUPD 


TLCXC 


VIS 


VOIDS 


WALTEM 


Purpose:  Function  TLCRTP  computes  the  pressure  of  the  liquid 

phase  as  a  function  of  density  in  the  traveling 
charge . 

Calls:  None. 

Called  by:  None. 


Purpose: 

Calls: 
Called  by: 


Subroutine  TLCSMQ  determines  the  solution  of  a 
system  of  linear  equations. 

TLCLUB,  TLCLUD. 

TLCBCL . 


Purpose: 


Calls: 
Called  by: 


Subroutine  TLCSTR  computes  the  stresses  in  the 
afterbody  of  a  projectile  carrying  a  traveling 
liquid  charge. 

None. 

TLCOUT ,  TLCUPD. 


Purpose: 


Calls: 
Called  by: 


Subroutine  TLCUPD  performs  the  integration  of  the 
governing  equations  associated  with  the  traveling 
liquid  charge. 

TLCLNK,  TLCMIX,  TLCPTR,  TLCRSP,  TLCSTR. 

TLCXC. 


Purpose:  Subroutine  TLCXC  is  the  executive  routine  for  the 

data  associated  with  the  traveling  liquid  charge. 

Calls:  PRTOE,  TLCBCX,  TLCGAC,  TLCLPV,  TLCUPD. 

Called  by:  INTAL. 


Purpose:  Function  VIS  computes  the  viscosity  of  the  gas-phase 

~ — “  as  a  function  of  temperature. 

Calls:  None. 

Called  by:  FRICT,  HEATP,  HEATW,  INTRPC,  OUTPUT ,  REGRES. 


Purpose : 


Calls: 
Called  by: 


Subroutine  VOIDS  updates  the  volume  fractions  of 
each  of  the  constituent  solid-phase  species  from 
the  history  of  the  porosity. 

None. 

INTEG. 


Purpose:  Subroutine  WALTEM  updates  the  thermal  equation  for 

the  tube  wall  temperature  determined  according  to  a 
cubic  profile  approximation. 

Calls :  None. 

Called  by:  INTEG. 
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TABLE  A.  2  SUMMARY  OF  XKTC  "MANDATORY "  INPUT  FILES 


FILE  NUMBER 


FILE  NAME 


Ml 
M2 
M3 
M4 
M5 
M6 
M7 
M8 
M9 
M10 
Mil 
Ml  2 
*M13 


Problem  Name 

Control  Data 

Integration  Parameters 

File  Counters 

Properties  of  Ambient  Gas 

General  Properties  of  Propellant  Bed 

I-th  Propellant  Type,  Location  and  Mass 

I-th  Propellant  Form  Function  Data 

I-th  Propellant  Rheology 

I-th  Propellant  Solid-Phase  Thermochemistry 
I-th  Propellant  Gas-Phase  Thermochemistry 
Tube  Geometry 

Projectile  and  Rifling  Characteristics 


File  Ml 3  is  not  mandatory  in  XKTC.  It  is  required  only  if 
neither  the  traveling  charge  option  nor  the  liquid  traveling 
charge  option  is  exercised. 
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TABLE  A.  3 


SUhfrfiVRY  OF  XKTC  CONTINGENT  INPUT  FILES 


FILE  NUMBER 


FILE  NAME 


Cl 

C2 

C3 

C4 

C5 

C5.05 

C5.1 

C5 . 2 

C5.3 

C5.4 

C5.5 

C5.6 

C6 

C7 

C8 

C9 

CIO 

Cll 

C12 

C12 . 1 

C12.2 

C13 

C14 

C15 

C16 

C17 

C17.5 

C18 

C19 


Logout  Counters 

Erosive  Burn  Rate  Parameters 

Not  Supported. 

Position  and  Mass  of  Additional  Bags  of  I-th 
Propellant 

Distribution  of  Volume  Fraction  of  I-th 
Propellant 

I-th  Propellant  Drag  Relaxation  Data 
I-th  Propellant  Port  Diameter  File  Counter 
I-th  Propellant  Port  Diameter 
I-th  Arbitrary  Form  Function  File  Counter 
I-th  Arbitrary  Form  Function  Description 
I-th  Propellant  Fracture  Data  Counter 
I-th  Propellant  Fracture  Characteristics 
Not  Supported. 

I-th  Propellant  Deterred  Layer  Properties 

Igniter  Thermochemistry 

Igniter  Discharge  Times 

Igniter  Discharge  Positions 

Igniter  Rate  of  Discharge 

Bore  Resistance 

Air  Shock  Data 

Projectile  Setback  Resistance  Data 
Tube  Thermal  Properties 
Tube  Initial  Temperature  Profile 
Not  Supported. 

Not  Supported. 

Not  Supported. 

Blowdown  Parameters 

I-th  Forward  Compactible  Filler  Element  Properties 
Constitutive  Data  for  I-th  Forward  Element 
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TABLE  A.  3  continued 


FILE  NUMBER 

C19  •  1 

C19.2 

C20 

C21 

C22 

C23 

C23.01 

C23.1 

C23.2 

C23.21 

C23.3 

C23.31 

C23.4 
C23. 41 

C23.5 

C23.6 

C23.61 

C23.62 
C23.63 
C23 . 7 

C23.71 

C23.8 

C23.9 

C24 

C25 

C25.1 

C25.ll 

C25.2 


FILE  NAME 

I-th  Rear  Compactible  Filler  Element  Properties 
Constitutive  Data  for  I-th  Rear  Element 
Not  Supported. 

Not  Supported. 

Not  Supported. 

Positions  for  Pressure  Table  Storage 
Projectile  Afterbody  Pressure  History  Option 
Kinetics  Option  Counters 
Properties  of  Species 

Properties  of  Species  in  NASA  SP-273  Formulation 

Composition  of  Propellant  Near  Field  Combustion 
Products 

Pressure  Dependent  Composition  of  Propellant  Near 
Field  Combustion  Products 

Composition  of  Igniter  Discharge  Combustion  Products 

Pressure  Dependent  Composition  of  Igniter  Discharge 
Combustion  Products 

Composition  of  Initial  Ambient  Gas 

Initial  Composition  of  Solid  Propellant 

Composition  of  Traveling  Charge  Near  Field 
Combustion  Products 

Types  of  Reactions  in  Mixture  of  Combustion  Products 

Species  Thermal  Equilibration  Switches 

Description  of  Arrhenius  Reactions  in  Mixture  of 
Combustion  Products 

Description  of  Pressure-Dependent  Reactions  in 
Mixture  of  Combustion  Products 

Description  of  Reactions  in  Solid  Propellant 

Solid  Propellant  Thermal  Response  Parameters 

Parameters  to  Define  Mesh  in  Invariant  Embedding 
Analysis 

Tank  Gun  Option  Control  Data 
Geometry  of  Projectile  Afterbody 

Spatial  Resolution  Factor  for  Analysis  of  Base  of 
Afterbody  as  Surface  of  Area  Discontinuity 

Thickness  and  Density  Counters  for  Reactive  Layer  I 


88 


TABLE  A.  3  continued 


FILE  NUMBER 

C25.3 

C25.31 

C25.4 

C25.5 

C25.6 

C25.7 

C25 . 8 

C25.9 

C26 

C26.1 

C26.2 

C26.21 

C26.3 

C26.31 

C26.4 

C26.5 

C26.6 

C26.7 

C26.71 

C26. 8 
C26.9 
C27 
C28 

C28.1 

C28.2 

C28.3 


FILE  NAME 

Thickness  of  Reactive  Layer  I 
Segment  Pointers  for  Reactive  Layer  I 
Density  of  Reactive  Layer  I 

Counter  to  Describe  Discharge  of  Reactive  Layer  I 
Times  to  Describe  Discharge  of  Reactive  Layer  I 
Positions  to  Describe  Discharge  of  Reactive  Layer  I 
Rate  of  Discharge  of  Reactive  Layer  I 
Burn  Rate  Counters  for  Reactive  Layer  I 
Burn  Rate  Data  for  Reactive  Layer  I 
Ignition  Data  for  Reactive  Layer  I 
Thermochemical  Data  for  Reactive  Layer  I 

Composition  of  Reactive  Layer  Near  Field  Combustion 
Products 

Properties  of  Deterred  Layer  of  Reactive  Layer  I 
Surface  Area  Multiplier  for  Reactive  Layer  I 
Endwall  Property  Pointers 
Permeability  Model  Data 

File  Counters  for  I-th  Reactivity  Model 
Thermochemical  Data  for  I-th  Reactivity  Model 

Composition  of  Near  Field  Combustion  Products  of 
I-th  Reactivity  Model 

Ignition  Value  for  I-th  Reactivity  Model 
Burn  Rate  Data  for  I-th  Reactivity  Model 
Tabular  Description  of  I-th  Reactivity  Model 

Internal  Properties  of  Control  Charge  Combustion 
Chamber 

External  Properties  of  Control  Charge  Combustion 
Chamber 

Control  Charge  Type 
Control  Charge  Form  Function 
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TABLE  A.  3  continued 

FILE  NUMBER 

C28 . 4 

C28.5 

C28 . 6 

C28.7 

C29 

C30 

C30.1 

C31 

C31.1 

C31.2 

C31.3 

C31.4 

C31.5 

C31.6 

C31.7 

C31.71 
C31.72 
C31.73 
C31 . 8 
C31.9 

C32 


FILE  NAME 

Control  Charge  Burn  Rate  Counter 
Control  Charge  Burn  Rate  Description 
Control  Charge  Thermochemistry 
Properties  of  Deterred  Layer 
Forward  Boundary  Discharge  Data 
Inbore  Rocket  Motor  Data 

Composition  of  Rocket  Motor  Combustion  Products 
ETG  Control  Switches 

I-th  Propellant  Helmholtz  Wiping  Coefficient 

I-th  Propellant  Tabular  Regression  Rate  Counter 

I-th  Propellant  Tabular  Regression  Rate  Data 

I-th  Plasma  Jet  File  Counters 

Global  Properties  of  I-th  Plasma  Jet 

Composition  of  I-th  Plasma  Jet 

I-th  Plasma  Jet  Mixing  Length  Parameters  in 
Integrated  Format 

Plasma  Capillary  Data 

Stoichiometry  Coefficients  for  Plasma  Model 
Current  History 

I-th  Plasma  Jet  Integrated  Data 

I-th  Plasma  Jet  Mixing  Length  Parameters  in 
Detailed  Format 

I-th  Plasma  Jet  Detailed  Data 
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TABLE  A. 4 


SUMMARY  OF  XKTC  TRAVELING  CHARGE  INPUT  FILES 


FILE  NUMBER 


FILE  NAME 


TCI 

TC2 

TC3 

TC4 

TC5 

TC6 

TC7 

TC7.1 

TC7.2 

TC8 

TC9 

TC10 

TC11 

TC12 

TC13 

TC14 

TC15 

TC16 

TC17 


Traveling  Charge  Control  Data 
Mesh  Parameters 
General  Properties 

Propellant  Thermochemical  Properties 
Burn  Rate  Switches 
Tabular  Burn  Rate  Data 
Tabular  Burn  Rate  Data  (con’t) 

Plasma  Guided  End  Burner 
Plasma  Guided  End  Burner  (Cont'd) 
Exponential  Burn  Rate  Data 
Propellant  Analytical  Rheology  Data 
Propellant  Tabular  Rheology  Data 
Propellant  Tabular  Rheology  Data  (con't) 
Ablative  Film  Data 
Propellant  Friction  Data 
Tabular  Bore  Resistance  Data 
Barrel  Shock  Resistance  Data 
Obturator  Setback  Resistance  Data 
Obturator  Friction  Data 
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SABLE  A.  5  SUMMARY  OF  XKTC  TRAVELING  LIQUID  CHARGE  INPUT  FILES 


FILE  NUMBER 

FILE  NAME 

TLC2 

Option  Switches 

TLC5 

Integration  Parameters 

TLC6 

Tube  Properties 

TLC6.1 

Obturator  Resistance 

TLC6.2 

Air  Shock  Resistance  Data 

TLC7 

Projectile  Properties 

TLC7 . 1 

Chamber  Length 

TLC9 

Properties  of  Liquid  Propellant 

TLC9.1 

Propellant  Droplet  Formation  Data 

TLC9.2 

Droplet  Burn  Rate  Data 

TLC10 

Initial  Conditions 

TLC11 

Initial  Cavity  Parameters 

TLC11.1 

Initial  Cavity  Geometry 

TLC22 . 1 

Properties  of  TLC  Expulsion  Charge 
Combustion  Chamber 

TLC22.2 

TLC  Expulsion  Charge  Type 

TLC22 . 3 

TLC  Expulsion  Charge  Form  Function 

TLC22 . 4 

TLC  Expulsion  Charge  Burn  Rate  Counter 

TLC22 . 5 

TLC  Expulsion  Charge  Burn  Rate  Description 

TLC22 . 6 

TLC  Expulsion  Charge  Thermochemistry 

TLC22 . 7 

Properties  of  Deterred  Layer 
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ZABLE  A.  6  DESCRIPTION  OF  INPUT  FILES 

File  [Ml] 

"Problem  Name"  (15A4)  One  Card 

« 

TITLE 

Problem  name.  May  be  up  to  60  alphanumeric  characters. 

File  [M2] 

"Control  Data"  (7L1,33I1)  One  Card 

• 

NPRINT 

T  if  print  on  logout,  F  otherwise. 

NGRAPH 

Inactive . 

NDISK 

T  if  disc  write  on  logout,  F  otherwise. 

DSKRD 

T  if  disc  start,  F  otherwise. 

IBTABL 

T  if  summarized  interior  ballistic  data  are  required, 

F  otherwise. 

NFLAM 

T  if  summary  of  ignition  delay  data  required, 

F  otherwise. 

NPTABL 

T  if  summarized  pressure,  pressure  difference  data  are 
required, 

F  otherwise. 

NEROS 

1  if  erosive  effect  to  be  included  in  propellant  combustion, 

0  otherwise.  If  NEROS  =  1,  File  [C2]  is  required. 

NDYN 

Inactive . 

NHTW 

0  if  wall  temperature  is  not  updated. 

1  if  cubic  profile  update  is  used. 

NBC ( 1) 

Inactive. 

NBC (2) 

Inactive. 

NRES(l) 

Inactive. 

NRES (2 ) 

Inactive. 

LDBED 

0  if  propellant  beds  initially  uncompacted, 

1  otherwise.  See  comment  in  File  [M9]  . 
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JHTW 


LYER 

IBRES 


NTC 


INHIB(l) 

INHIB (2 ) 
INHIB (3 ) 
NXCW 


NBLDWN 


0  if  heat  loss  to  tube  is  neglected, 

1  if  heat  loss  is  calculated  by  empirical  correlation  for 
fully  developed  turbulent  flow.  File  [C13]  is  required. 

Inactive. 

1  if  linear  interpolation  of  tabular  data  from  File  [C12]  is 
used  to  define  bore  resistance.  No  velocity  dependence  is 
considered. 

2  if  the  interpolated  value  is  multiplied  by  7.2V"0*6,  where 
V  is  the  projectile  velocity  (ft/sec),  provided  V  ^  27  fps. 

3  if  the  interpolated  value  is  multiplied  by 

(1  +  0 . 0004414V)  /  (1  +  0.005046V)  where  V  is  the  projectile 
velocity  (in/sec) . 

4  if  the  resistance  is  that  for  1  plus  resistance  due  to  the 
air  shock  in  front  of  the  projectile.  File  [C12.1]  is 
required. 

5  if  the  resistance  is  that  for  1  plus  resistance  due  to 
Poisson  deformation  of  the  projectile.  File  [C12.2]  is 
required. 

6  if  the  resistance  is  that  for  1  plus  resistance  due  to 
the  air  shock  plus  resistance  due  to  Poisson  deformation. 
Files  [C12.1]  and  [C12.2]  are  required. 

If  any  other  value  is  used,  IBRES  will  default  to  the 
value  2. 

0  if  traveling  charge  option  not  required. 

1  if  traveling  charge  option  is  in  effect. 

When  NTC  =  1,  NUNIN  and  NUNOUT  (File  [M3])  must  not  be 
entered  as  nine  (default  values  are  eight);  NEL  (File  [M4] ) 
must  be  entered  as  zero;  NDIM  (File  [M3])  must  not  exceed 
KQ  -  2  for  a  granular  booster  or  KQ/2  -  1  for  a  stick 
booster.  KQ  is  presently  999.  Files  [TCI]  through  [TC17] 
are  required. 

2  if  end  burning  plasma  guided  charge  is  located  in  breech 
of  chamber.  Files  [TCI]  through  [TC17]  are  required.  In 
File  [TC3]  XIB  must  be  entered  as  zero. 

0  if  propellant  type  1  does  not  have  a  deterred  layer. 

1  if  propellant  type  1  does  have  a  deterred  layer. 

File  [C7]  is  required  in  this  case. 

As  per  INHIB (1),  but  for  second  propellant  type. 

As  per  INHIB (1),  but  for  third  propellant  type. 

0  if  explicit  analysis  of  impact-induced  compaction  wave  not 
required. 

1  if  explicit  analysis  is  required.  In  this  case,  the  value 
of  XIMPV  (File  [M6] )  must  be  set. 

0  if  tube  blowdown  analysis  is  not  required. 

1  if  blowdown  analysis  is  required.  File  [C17.5]  is 
required  in  this  case. 

2  if  end  burning  plasma  guided  charge  is  located  in  breech 
of  chamber.  Files  [TCI]  through  [TC17]  are  required. 

In  File  [TC3]  XIB  must  be  entered  as  zero. 
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NSWSOL 

KMODE 

MODET 

NECHO 

INBCX 

NTLC 

NFRACT 

INTRIN 

NETG 

NFILT 


0  if  non-conservative  form  of  solid-phase  continuity 
equation  is  to  be  used. 

1  if  conservative  form  is  to  be  used.  It  is  recommended 
that  this  option  be  selected  only  if  excessive  mass  defects 
result  from  the  use  of  the  non-conservative  form. 

0  if  kinetics  option  not  desired. 

1  if  gas— phase  is  to  be  treated  as  a  reacting,  homogeneous 
mixture.  See  Files  [C23.1]  through  [C23.9]. 

2  if,  in  addition  to  treatment  of  gas-phase  as  a  mixture, 
subsurface  reactivity  and/or  finite  difference  solution  of 
solid-phase  thermal  response  is  desired. 

See  Files  [C23.1]  through  [C23.9]. 

0  if  tank  gun  option  not  desired. 

1  if  tank  gun  is  desired.  See  Files  [C25.1]  through  [C27] . 

0  if  interpretation  of  input  and  normal  run  desired. 

1  if  input  data  not  interpreted  but  normal  run  desired. 

2  if  interpretation  of  input  data  with  no  subsequent  run 
desired. 

Note:  Independently  of  the  value  of  NECHO,  the  Code  prints 

an  image  of  the  card  input  file. 

0  if  forward  boundary  is  impermeable. 

1  if  forward  boundary  is  permeable  to  mixture  of  combustion 
products.  File  [C29]  is  required. 

2  if  forward  boundary  is  an  inbore  rocket  motor. 

Files  [C30]  and  [C30.1]  are  required. 

0  if  traveling  liquid  charge  option  not  required. 

1  if  traveling  liquid  charge  option  is  required. 

Files  [TLC2]  -  [TLC22.7]  are  required. 

0  if  analysis  of  propellant  fracture  is  not  required. 

1  if  analysis  of  propellant  fracture  is  required. 

Files  [C5.5]  and  [C5.6]  are  required. 

0  if  values  of  intergranular  stress  in  File  [C5.6]  are  non- 
intrinsic  (dilute)  averages. 

1  if  values  are  intrinsic  averages. 

0  if  electrothermal  gun  option  is  not  required. 

1  if  electrothermal  gun  option  is  required. 

Files  [C31]  -  [C32]  are  required. 

0  if  no  solid-phase  smoothing  is  required. 

1  if  porosity  is  smoothed 

2  if  solid-phase  velocity  is  smoothed. 

3  if  both  porosity  and  solid-phase  velocity  are  smoothed. 
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File  [M3]  "Integration  Parameters"  (615, F10. 0/8F10.  0)  Two  Cards 


NDIM 


NSTEP 


NDTST 

NSTOP* 

NUNIN 

NUNOUT 


Number  of  grid  points  to  be  used  in  calculation.  In 
general,  NDIM  must  not  exceed  the  value  of  KQ,  currently  set 
by  a  PARAMETER  statement  equal  to  999.  If  perforated  stick 
propellant  is  present,  NDIM  must  not  exceed  KQ/2  or  499  in 
the  current  version. 

Number  of  integration  steps  before  logout.  (Each  step 
consists  of  a  predictor  followed  by  a  corrector.)  If 
NSTEP  =  0,  logout  follows  every  predictor  as  well  as  every 
corrector.  If  NSTEP  <  0,  File  [Cl]  is  required  with  |NSTEP| 
pairs  of  data.  NSTEP  2  -10. 

Step  number  for  disc  start. 

Number  of  steps  for  termination. 

Unit  number  for  disc  read.  If  NUNIN  =  0,  it  is  defaulted 
to  8. 

Unit  number  for  disc  logout.  If  NUNOUT  =0,  it  is  defaulted 
to  8. 


DTPRT 

TSTOP* 

ZSTOP* 

TINT 

SAFE 

CRIT 


Time  interval  before  logout  (sec) .  If  entered  as  zero,  it 
is  defaulted  to  1010. 

Time  for  termination  (sec) . 

Projectile  travel  for  termination  (in) . 

Maximum  time  step  (sec)  . 

Stability  safety  factor.  Recommended  value  is  1.1  although 
larger  values  may  sometimes  be  required. 

Stability  safety  factor  for  source  terms.  Recommended  value 
is  0.05. 


RZOLV  Spatial  resolution  factor.  Recommended  range  of  values  is 

0.01  s  RZOLV  s  0.05.  If  RZOLV  is  entered  as  zero,  it  will 
default  internally  to  1/ (NDIM  -  1). 

TABLIB*  Time  interval  for  storage  of  summarized  interior  ballistic 

data  (sec) . 


TABLP** 


Time  interval  for  pressure  table  storage  (sec) . 


Termination  occurs  at  whichever  of  NSTOP,  TSTOP  or  ZSTOP  is  first 
satisfied,  except  when  NBLDWN  =  1.  (See  File  [M2]).  In  the  latter 
case  the  projectile  motion  is  terminated  at  ZSTOP  and  the  solution  is 
continued  until  whichever  of  NSTOP,  TSTOP  or  PBRF  (see  File  [C17.5]) 
is  first  satisfied. 

Table  sizes  are  dimensioned  to  500.  When  overflow  is  imminent,  tables 
are  condensed  by  deleting  every  second  datum.  Subsequently,  storage 
time  is  doubled. 
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File  [Cl]  "Logout  Counters"  (1615)  One  or  Two  Cards 

N.B.  File  required  if  and  only  if  NSTEP  <  0.  (See  File  [M3] .) 

NDTEP(l)  Maximum  value  of  integration  step  number  for  which  MSTEP(l) 

is  to  be  used. 

MSTEP(l)  Number  of  integration  steps  (predictor  plus  corrector 

•  count  as  one  unit)  between  logout  cycles. 


NDTEP  (|NSTEP|)* 


Maximum  value  of  integration  step  number  for  which 
MSTEP ( |NSTEP| )  is  to  be  used. 


MSTEP ( |NSTEP| )  Corresponding  value  of  number  of  steps  between  logout 

cycles . 


If  NDTEP (|NSTEP| )  is  exceeded  during  the  calculation,  the  value 
MSTEP (|NSTEP|)  will  be  used  as  a  default  quantity. 


File  [M4]  "File  Counters"  (1615)  Two  Cards 


NSTA 

JJ 

II 

NBRES 

NTEM 

NEL 

NPROP 

NBRDS 


Number  of  entries  in  tube  geometry  table.  2  s  NSTA  £  10. 

Number  of  times  at  which  primer  discharge  is  specified. 

0  s  JJ  s  40. 

If  II  and  JJ  i  2,  Files  [C8]  -  [Cll]  are  required. 

Number  of  positions  at  which  primer  discharge  is  specified. 

0  s  II  <;  40. 

Number  of  entries  in  bore  resistance  table.  0  s  NBRES  s  20. 
If  NBRES  2  2,  File  [C12]  is  required. 

Number  of  entries  in  tube  initial  temperature  profile. 

If  NTEM  =  0,  tube  temperature  defaults  to  TEMST  (see 
File  [M5] . )  If  NTEM  *  0,  File  [C14]  is  required. 

0  S  NTEM  <;  10. 

Number  of  elements  to  characterize  compactible  filler 
between  bed  and  projectile.  If  NEL  =  0,  projectile  base 
is  taken  as  right-hand  boundary  for  computational  domain. 

If  NEL  *  0,  File  [C18]  is  required.  0  s  NEL  s  10. 

Number  of  types  of  propellant  grains.  1  s  NPROP  s  3. 

Number  of  burn  rate  data  sets  to  describe  pressure 
dependence  of  exponent  and  pre-exponential  factors. 

(See  File  [M10] . )  Note  that  the  same  value  is  assumed  for 
all  propellant  species,  if  more  than  one  are  defined. 
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NEPS(l) 


NEPS (2) 
NEPS (3) 
NZPT 


NMS(l) 


Number  of  entries  in  initial  distribution  of  volume 
fraction  of  propellant  type  1.  If  NEPS  =  0,  porosity  is 
calculated  from  mass  and  position  data  given  in  File  [M7] . 

If  NEPS  *  0,  File  [C5]  j_s  required.  Propellant  types  may  be 
entered  in  either  mode,  independently  of  the  representation 
of  other  types.  0  NEPS(l)  <;  10. 

Number  of  entries  for  type  2. 

Number  of  entries  for  type  3. 

Number  of  entries  in  table  of  positions  for  summarized 
pressure  data.  If  NZPT  *  0,  File  [C23]  is  required. 

0  ^  NZPT  £  8. 

Inactive. 


NMS  (2) 


Inactive. 


NWIB 


Inactive. 


MORE ( 1 ) 

MORE (2) 


Number  of  additional  bags  of  propellant  of  type  1. 

If  MORE  ( 1 )  >  0,  File  [C4]  is  required.  0  <;  MORE(l)  <;  9. 

Number  of  additional  bags  of  propellant  of  type  2.  Only 

required  if  NPROP  ^  2.  Starts  a  new  card. 


MORE (3) 


Number  of  additional  bags  of  propellant  of  type  3.  Only 
required  if  NPROP  =3. 


Number  of  elements  to  characterize  compactible  filler 
between  bed  and  breech.  If  NBL  *  0,  File  [C19.1]  is 
required.  0  £  NBL  ^  10. 


File  [M5] 

"Properties  of  Ambient  Gas"  (8F10.0) 

One  Card 

TEMST 

Initial  temperature  (R)  . 

PST 

Initial  pressure  (psi) . 

GMST 

Molecular  weight  (lbm/lbmol) . 

GAMST 

Ratio  of  specific  heats  (-) . 

File  [M6] 

"General  Properties  of  Propellant  Bed" 

(8F10.0)  One  Card 

TP0 

Initial  temperature  (R)  . 

BETA 

Inactive. 

BETAB 

Inactive. 

CE  (1) 

Inactive. 
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CE  (2) 


Inactive. 


CEO)  Inactive. 

XIMPV  Minimum  impact  velocity  for  initiation  of  explicit  analysis 

of  intergranular  compaction  wave  (in/ sec).  Note  that  if 

XIMPV  is  entered  as  zero  it  will  default  to  10®,  effectively 

precluding  the  explicit  analysis. 


File  [C2]  "Erosive  Burn  Rate  Parameters"  (8F10.0)  One  Card 
N.B.  File  required  if  and  only  if  NEROS  =  1.  (See  File  [M2].) 

Erosive  burning  pre-exponential  factor  (in2  R/lbf ) . 
Erosive  burning  exponential  factor  (-) . 


CEROS 

BEROS 


Note:  The  subsequent  Files  [M7],  [C4]  ,  [C5]  ,  [M8]  ,  [M9]  ,  [M10]  ,  [C6]  , 

[Mil]  and  [C7]  are  repeated,  as  a  group  for  each  of  the  NPROP 

(see  File  [M4] )  types  of  propellant  which  constitute  the  solid-phase. 


File  [M7]  "I-th  Propellant  Type,  Location  and  Mass"  (5A4,6F10.0)  One  Card 


GRNAM(I) 

ZGR(1,I) 

ZGR (2,1) 

WTGRA( 1, 1 ) 


RHOP(I) 
RGRI (1,1) 


RGRO (1,1) 


Name  of  propellant.  Up  to  20  alphanumeric  characters. 

Left-hand  boundary  of  first  bag  of  propellant  of  type  I 
(in)  . 

Right-hand  boundary  of  first  bag  of  propellant  of  type  I 
(in)  . 

Mass  of  first  bag  of  propellant  of  type  I  (lbm)  .  A  negative 
value  of  WTGRA  may  be  entered.  In  such  a  case,  the  absolute 
value  is  used  to  define  the  mass.  The  negative  sign  is  used 
to  set  an  internal  switch  which  causes  the  computation  of 
initial  porosity  for  a  granular  charge  to  reflect  the 
assumption  that  the  propellant  is  packaged  as  a  cylinder 
rather  than  filling  uniformly  each  cross-section  of  the 
tube.  Conversely,  a  stick  charge  will  be  given  a  uniform 
initial  distribution  of  porosity  rather  than  one  which 
varies  with  cross-sectional  area. 

Density  of  propellant  type  I  (lbm/in3). 

Inner  radius  of  rear  of  bag  (in)  .  Only  required  if 
MODET  =  1.  (See  File  [M4] . )  If  RGRI (1,1)  is  input  as 
zero  it  is  assumed  to  coincide  with  the  inner  radius  of 
the  available  flow  cross-section. 

Outer  radius  of  rear  of  bag  (in)  .  Only  required  if 
MODET  =  1.  (See  File  [M4]  . )  If  RGRO(l,I)  is  input  as  zero 
it  is  assumed  to  coincide  with  the  outer  radius  of  the 
available  flow  cross-section. 
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File  [C4]  "Position  and  Mass  of  Additional  Bags  of  I-th  Propellant" 
(8F10.0)  More (I)  Cards 

N.B.  File  required  if  and  only  if  MORE(I)  *  0.  (See  File  [M4].) 

ZGR(3,I)  Left-hand  boundary  of  second  bag  of  propellant  of  type  I 

(in)  . 

ZGR (4,1)  Right-hand  boundary  of  second  bag  of  propellant  of  type  I 

(in)  . 

WTGRA(2,I)  Mass  of  second  bag  of  type  1  (lbm) . 

RGRI (2,1)  Inner  radius  of  second  bag  (in). 

RGR0(2,I)  Outer  radius  of  second  bag  (in). 

ZGR (5, 1)*  Left-hand  boundary  of  third  bag. 

ZGR (2*MORE ( I ) +2 , I )  Right-hand  boundary  of  bag  MORE(I)+l  (last  bag). 

WTGRA(MORE (I)+l)  Mass  of  last  bag. 

RGRI (MORE (I) +1)  Inner  radius  of  last  bag  (in). 

RGRO(MORE (I)+l)  Outer  radius  of  last  bag  (in). 

★ 

Begin  new  card  for  each  bag. 

File  [C5]  "Distribution  of  Volume  Fraction  of  I-th  Propellant"  (8F10.0) 
One  to  Three  Cards 

N.B.  File  required  if  and  only  if  NEPS(I)  =  0.  (See  File  [M4] . ) 

ZEPS (1,1)  First  position  relative  to  breech  (in). 

EPSO (1,1)  Corresponding  volume  fraction  of  propellant  type  I. 

ZEPS (NEPS (I) , I)  Last  position. 

EPSO (NEPS (I) , I)  Corresponding  volume  fraction. 
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( 15 , 5F10 . 0,I5,F10.0,I5) 


File  [M8]  "I-th  Propellant  Form  Function  Data" 
One  Card 


NFORM(I)  Form  function  indicator,  1  s  |NFORM(I)|  £  17.  NFORM  may  be 

entered  as  a  negative  number.  In  such  a  case,  the  absolute 
value  is  used  to  determine  the  form  function,  but  the  grains 
are  taken  to  be  stacked.  This  option  allows  granular 
propellant  to  respond  as  though  it  had  the  flow  resistance 
of  stick  propellant. 

OD (I)  Grain  dimension  (in).  (See  table  below.)  If  OD  <  0  for 

NFORM  =  7  or  9,  the  grains  will  be  treated  as  inhibited  on 
the  outer  cylindrical  surfaces  up  to  the  point  of  slivering. 

DPERF(I)  Grain  dimension  (in).  (See  table  below.  ) 

GLEN(I)  Grain  length  (in).  If  NFORM  =  14,  setting  GLEN  =  0  will 

cause  this  granulation  to  be  modeled  as  a  stick. 

NPERF(I)  Number  of  perforations  (-)  except  for  NFORM  =  14  in  which 

case  NPERF  is  the  number  of  slots. 

SLW(I)  Grain  dimension  (in).  (See  table  below.) 

NFIX(I)  If  0,  grains  are  assumed  to  be  free  to  move. 

If  1,  grains  are  assumed  to  be  attached  to  the  tube. 

If  2,  grains  are  assumed  to  be  attached  to  the  projectile. 

BONDX(I)  Strength  of  bond  to  tube  or  projectile  (lbf )  .  If  BONDX(I) 

is  entered  as  zero,  it  is  taken  to  be  infinite.  Separation 
from  tube  or  projectile  occurs  when  absolute  value  of  force 
required  to  maintain  attachment  exceeds  BONDX(I). 

If  NDUM  =  1,  File  [C5.05]  is  required  to  define  non-default 
values  of  drag  relaxation  parameters  for  stacked  granular 
bed. 


NDUM 


FORM  FUNCTION  PARAMETERS 


NFORM  GRAIN  TYPE 

OP 

DPERF 

SLW 

1 

Sphere 

Diameter  (in) 

- 

- 

2 

Cylinder 

Diameter  (in) 

- 

- 

3 

Stick* 

Diameter  (in) 

Perforation 
Diameter  (in) 

- 

4 

Strip* 

Width  (in) 

Thickness  (in) 

- 

5 

Monoperf orated 

Diameter  (in) 

Perforation 
Diameter  (in) 

- 

6 

Monoperforated  with 
outside  inhibition 

Diameter  (in) 

Perforation 
Diameter  (in) 

- 

7 

Seven  Perforations 

Diameter  (in) 

Perforation 
Diameter  (in) 

- 

9 

Nineteen  Perforations 

Diameter  (in) 

Perforation 
Diameter  (in) 

- 

10 

Hexagonal  Seven- 
Perforation  Stick 

Distance  between 
flats  (in) 

Perforation 
Diameter  (in) 

- 

11 

Slotted  stick* 

( single-voidage ) 

Diameter  (in) 

Perforation 
Diameter  (in) 

Slot 

Width  (in) 

12 

Scroll* 

( single-voidage ) 

Width  (in) 

Thickness  (in) 

- 

13 

Scroll* 

( dual-voidage ) 

Width  (in) 

Thickness  (in) 

External 
Diameter  of 
Scroll  (in) 

14 

Blind  slit 

Diameter  (in) 

Diameter  of 
slotted  core  (in) 

15 

Hexagonal  Nineteen- 
Perforation 

Diameter  (in)** 

Perforation 
Diameter  (in) 

- 

16 

Monolithic  Grain 
with  central  port 

Port  diameter 
at  rear  (in) 

Port  diameter 
at  front  (in) 

- 

17 

Arbitrary  Tabular**** 

- 

- 

- 

★ 

End  burning  is  neglected 

for  these  forms. 

Hence  GLEN  (File 

[M8]  ) 

may  be  entered  arbitrarily. 

**  Grains  assumed  to  have  rounded  corners.  Diameter  is  between  opposite 
corners . 

***  Burning  is  assumed  to  take  place  only  on  the  surfaces  of  the  internal 
port.  Projectile  afterbody  may  intrude  into  port.  NFIX(I)  and 
BONDX(I)  default  to  1  and  0  respectively..  If  OD(I)  -  0,  or 
DPERF(I)  =  0,  then  Files  [C5.1],  [C5.2]  are  required  to  define  the 

diameter  of  the  port  as  a  function  of  position. 

****  Files  [C5.3],  [C5.4]  required  if  NFORM  =  17. 
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File  [C5.05]  "I-th  Propellant  Drag  Relaxation  Data”  (8F10.0)  One  Card 

N.B.  This  file  is  required  if  and  only  if  NDUM  =  1  (See  File  [M8]  )  . 

RLXF(I)  Exponent  used  to  control  rate  of  relaxation  of  drag  of 

stacked  granular  propellant  from  that  for  stick  to  that  for 
granular  propellant.  Default  value  is  1.0. 

RVOLF(I)  Fraction  of  granular  flow  resistance  experienced  by  stacked 

granular  bed  in  settled  or  loaded  condition  (-) .  Default  is 
zero. 


TUMBLE  ( I )  Time  delay  for  inset  of  tumbling  of  stacked  granular  bed 

(msec) .  Default  is  zero. 

TSPLIT ( I )  Time  delay  for  breakup  of  stacked  granular  propellant 

(msec)  . 


TUMINT(I)  Time  interval  to  complete  tumbling  (msec). 

SPLINT (I)  Time  interval  to  complete  breakup,  (msec). 


File  [C5.1]  "I-th  Propellant  Port  Diameter  File  Counter”  (15)  One  Card 

N.B.  File  required  if  and  only  if  NFORM(I)  =  16  and  either  OD(I)  =  0  or 
DPERF(I)  -  0.  (See  File  [M8].) 

MNOP(I)  Number  of  entries  in  file  to  define  diameter  of  port  of 

monolithic  grain.  2  <;  MNOP(I)  s  8. 


File  [C5.2]  "I-th  Propellant  Port  Diameter"  (8F10.0)  One  to  Two  Cards 

N.B.  File  required  if  and  only  if  NFORM(I)  =  16  and  either  OD(I)  =  0  or 
DPERF(I)  -  0.  (See  File  [M8] . ) 

ZMNO(l,I)  First  axial  position  relative  to  rear  surface  of  grain  (in). 

DMNO(l,I)  Corresponding  diameter  of  port  (in). 

ZMNO (MNOP ( I ) ,  I )  Last  axial  position. 

DMNO  (MNOP  (I ) ,  I )  Corresponding  diameter . 


File  [C5.3]  "I-th  Arbitrary  Form  Function  File  Counter”  (15)  One  Card 

N.B.  File  required  if  and  only  if  NFORM(I)  =  17.  (See  File  [M8].) 

NARBF(I)  Number  of  sets  of  data  in  tabular  description  given  in 

File  [C5 . 4]  .  2  s  NARBF(I)  <;  20. 
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File  [C5.4]  "I-th  Arbitrary  Form  Function  Description”  (3F10.0) 
NARBF(I)  Cards 


ARBR(1,I) 
ARBS (1,1) 
ARBV(1,I) 
ARBR (2,1) 
ARBS (2,1) 
ARBV (2,1) 


First  value  of  surface  regression  (in) . 

First  value  of  surface  area  of  grain  (in2)  . 

First  value  of  volume  of  grain  (in3)  . 

Second  value  of  regression.  Starts  a  new  card. 

Second  value  of  area. 

Second  value  of  volume.  If  ARBV(2/I)  <  10“10,  the  volume 
will  be  calculated  automatically  from  the  values  of  area 
versus  regression. 


ARBV (NARBV ( I ) ,  I )  Last  value  of  volume. 


File  [M9]  "I-th  Propellant  Rheology”  (6F10.0)  One  Card 


GAP (I )  Rate  of  propagation  of  intergranular  stress  in  settled, 

loading  granular  bed  of  type  I  (in/sec) .  If  propellant  I 
consists  of  stick  then  GAP (I)  is  independent  of  the 
settling  porosity. 

GEPO(I)  Porosity  of  settled  bed  for  type  I  propellant.  If  LDBED  =  0 

(see  File  [M2])  and  the  porosity  of  the  bed  is  less  than 
GEPO(I)  at  any  point  where  type  I  is  present,  GEPO(I)  is 
automatically  defaulted  to  the  smallest  value  of  porosity 
which  occurs  in  the  initial  distribution.  This  property  may 
be  used  to  avoid  calculating  GEPO(I). 

GCAP(I)  Rate  of  propagation  of  intergranular  stress  during  unloading 

and  reloading  of  propellant  type  I  (in/sec) .  Not  required 
for  stick  propellant.  If  GCAP(I)  <  10'10 ,  a  reversible  law 
will  be  used  for  granular  propellant. 


PRPYLD 


Inactive. 


ANU(I) 


Poisson  ratio  of  propellant  (-) .  Must  be  specified  for 
stick  propellant.  ANU(I)  defaults  to  0.5  internally  if 
propellant  I  is  granular  or  if  ANU(I)  is  entered  as  zero. 
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File  [C5.5]  "I-th  Propellant  Fracture  Data  Counter"  (15)  One  Card 

N.B.  This  file  is  required  if  and  only  if  NFRACT  =  1.  (See  File  (M2].) 

NSTRV(I)  Number  of  sets  of  data  in  fracture  characterization  of 

File  [C5.6].  2  £  NSTRV(I)  £  20. 


File  [C5.6]  wI-th  Propellant  Fracture  Characteristics"  (3F10.0) 
NSTRV(I)  Cards 


N.B.  This  file  is  required  if  and  only  if  NFRACT  =  1.  (See  File  [M2]  .) 


STRV(1, I) 


BRF (1,1) 


RAXF(1,I) 


STRV (2,1) 


First  value  of  maximum  intergranular  stress  experienced  by 
propellant  (psi) .  If  INTRIN  =  0  (File  [M2] ) ,  the  stress  is 
non-intrinsic  and  if  INTRIN  =  1,  the  stress  is  understood  to 
be  an  intrinsic  average. 

Multiplier  to  be  applied  to  mass  burning  rate  based  on 
nominal  form  function  when  maximum  stress  equals  STRV(1,I) 

(-)  • 

Multiplier  to  be  applied  to  interphase  drag  and  heat 
transfer  based  on  nominal  form  function  when  maximum  stress 
equals  STRV(1,I)  (-)  •  If  RAXF  =  0,  it  will  default  to  BRF. 

Second  value  of  maximum  intergranular  stress.  Starts  a  new 
card. 


RAXF (NTSRV (I)  ,1)  Last  value  of  multiplier  for  interphase  drag  and  heat 

transfer. 


N.B.  This  table  is  linearly  interpolated. 
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File  [M10]  "I-th  Propellant  Solid-Phase  Thermochemistry”  (8F10.0) 
One  to  Three  Cards 


UPPR (1,1) 

B22  (1,1) 
BNN{1,I) 


Maximum  value  of  pressure  for  corresponding  values  of  burn 
rate  pre-exponential  and  exponential  factors  (psi) . 

Burning  rate  pre-exponential  factor  (in/sec-psin)  . 

Burning  rate  exponent  (-) . 


UPPR ( NBRDS / I ) * 
B22 (NBRDS, I) 
BNN (NBRDS,  I ) 
B1(I) 

TEMPIG  (I) 

KP  (I ) 

ALPHAP(I) 
ALPHA (I) 


Maximum  value  for  last  set  of  burn  rate  data. 
Corresponding  pre-exponential  factor. 
Corresponding  exponent. 

Burning  rate  additive  constant  (in/ sec) . 
Ignition  temperature  (R) . 

Thermal  conductivity  (lbf/sec/R) . 

Thermal  diffusivity  (in2/sec)  . 

Emissivity  factor  (-) . 


*  If  pressure  exceeds  UPPR (NBRDS, I) ,  the  corresponding  values  of  pre¬ 
exponential  and  exponential  factors  are  used  as  default  values. 


File  [Mil]  "I-th  Propellant  Gas-Phase  Thermochemistry"  (4F10.0)  One  Card 


ECHEM(I) 
GMW(I) 
GAMMA (I ) 
BV  (I ) 


Internal  energy  released  in  combustion  (lbf-in/lbm) . 
Molecular  weight  (lbm/lbmol) . 

Ratio  of  specific  heat  (-) . 

Covolume  (inVlbm)  . 
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File  [C7]  "I-th  Propellant  Deterred  Layer  Properties”  (5F10.0)  One  Card 

N.B.  File  required  if  and  only  if  INHIB(I)  *  0.  (See  File  [M2].) 

ECHIB (I) *  Internal  energy  released  in  combustion  at  start  of  deterred 

layer  (lbf-in/lbm) . 

ECHIB2 (I )  Internal  energy  released  in  combustion  at  end  of  deterred 

layer  (lbf-in/lbm) . 

RGFAC  ( I ) *  Factor  by  which  burn  rate  is  multiplied  at  start  of  deterred 

layer  (-) . 

RGFAC2 ( I )  Factor  by  which  burn  rate  is  multiplied  at  end  of  deterred 

layer  (-) . 

HIBX(I)  Depth  of  inhibited  layer  (-) . 

*  Values  within  deterred  layer  deduced  by  linear  spacewise  interpolation. 
Final  values  need  not  be  the  same  as  those  of  the  undeterred  propellant. 

File  [C8]  "Igniter  Thermochemistry"  (8F10.0)  One  Card 

N.B.  File  required  if  and  only  if  II,  JJ  £  2.  (See  File  [M4].) 

EIG  Internal  energy  released  in  combustion  (lbf-in/lbm)  . 

GMIG  Molecular  weight  (lbm/lbmol) . 

GAMIG  Ratio  of  specific  heats  (-) . 

VIG  Specific  volume  of  igniter  solid-phase  (inVlbm)  • 

File  [C9]  "Igniter  Discharge  Times"  (8F10.0)  One  to  Five  Cards 

N.B.  File  required  if  and  only  if  II,  JJ  z  2.  (See  File  [M4]  .) 

TPHI(l)  First  time  in  tabular  representation  of  igniter  discharge 

•  (sec) . 

TPHI(JJ)  Last  time. 
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File  [CIO]  "Igniter  Discharge  Positions"  (8F10.0)  One  to  Five  Cards 

N.B.  File  required  if  and  only  if  II,  JJ  *  2.  (See  File  [M4].) 

2 PHI ( 1 )  First  position  in  tabular  representation  of  igniter 

*  discharge  (in) . 

ZPHI(II)  Last  position. 

File  [Cll]  "Igniter  Rate  of  Discharge"  (8F10.0)  Two  to  Two  Hundred  Cards 

N.B.  File  required  if  and  only  if  II,  JJ  £  2.  (See  File  [M4].) 

PHI  (1,1)  Igniter  discharge  per  unit  length  per  unit  time  at  first 

position  and  first  time  (lbm/in/sec) . 

PHI (2,1)  Discharge  at  second  position  and  first  time. 

PHI (11,1)  Discharge  at  last  position  and  first  time. 

PHI (1,2)*  Discharge  at  first  position  and  second  time. 

PHI  (II ,  JJ)  Discharge  at  last  position  and  last  time. 

*  PHI ( 1,  J)  begins  a  new  card,  J  =  1,  .  .  .  .  ,JJ. 

File  [M12]  "Tube  Geometry"  (8F10.0)  One  to  Three  Cards 

ZA ( 1)  First  axial  location  relative  to  breech  (in)  . 

RA ( 1 )  Corresponding  radius  of  bore  (in) . 

ZA(NSTA)  Last  axial  location 

RA(NSTA)  Corresponding  radius 
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File  [C12]  "Bore  Resistance"  (8F10.0)  One  to  Five  Cards 

N.B.  File  required  if  and  only  if  NBRES  2  2.  (See  File  [M4] . ) 

BRZ(l)  First  axial  location.  If  BRZ(l)  >0,  it  is  understood  to  be 

relative  to  breech  (in).  If  BRZ(l)  is  entered  as  zero, 
however,  all  values  of  BRZ  are  understood  to  be  relative  to 
the  initial  position  of  the  projectile. 

BR(1)  Corresponding  resistance  exerted  on  projectile  when  base  is 

at  BRZ ( 1 )  (psi) . 

BRZ (NBRES)  Last  location. 

BR (NBRES)  Corresponding  resistance. 

File  [C12.1]  "Air  Shock  Data"  (4F10.0)  One  Card 

N.B.  This  file  is  required  if  and  only  if  IBRES  =  4  or  6.  (See  File  [M2].) 

AIRGAM  Ratio  of  specific  heats  of  gas  in  front  of  projectile  <-) . 

A2RP0  Initial  pressure  of  gas  in  front  of  projectile  (psi) . 

AIRTO  Initial  temperature  of  gas  in  front  of  projectile  (R) . 

AIRMW  Molecular  weight  of  gas  m  front  of  projectile  (lbm/lbmol)  . 

File  [C12.2]  "Projectile  Setback  Resistance  Data"  (4F10.0)  One  Card 

N.B.  The  file  is  required  if  and  only  if  IBRES  =  5  or  6,  (See  File  [M2].) 

PRMU  Coefficient  of  friction  between  projectile  body  and  tube 

wall  (-) . 

PRNU  Poisson  ratio  of  projectile  material  (-) . 

PRLEN  Length  of  projectile  (in)  . 

PRLENC  Length  of  projectile  in  contact  with  wall  (in) . 

If  <  10"10,  PRLENC  defaults  to  PRLEN. 


109 


File  [C13]  "Tube  Thermal  Properties"  (3F10.0)  One  Card 
N.B.  File  required  if  and  only  if  JHTW  *  0.  (See  File  [M2].) 

KW  Thermal  conductivity  (lbf/sec/R) . 

ALPHflW  Thermal  diffusivity  (in2/sec) . 

ALFAW  Emissivity  factor  (-)  . 

File  [C14]  "Tube  Initial  Temperature  Profile"  (8F10.0)  One  to  Three  Cards 
N.B.  File  required  if  and  only  if  NTEM  *  0.  (See  File  [M4].) 
zwd)  First  axial  location  relative  to  breech  (in). 

TEMW(l)  Corresponding  wall  temperature  (R) . 


File  [C17.5]  "Blowdown  Parameters"  (8F10.0)  One  Card 


N.B.  File  required  if  and  only  if  NBLWDN  =  1.  (See  File  [M2].) 

PBRF  Value  to  which  breech  pressure  must  drop  for  termination  of 

blowdown  calculation  (psi) . 


PBRF2 


Distance  from  breech  at  which  PBRF  is  determined  (in)  . 


Value  to  which  velocity  must  drop  for  termination  of 
blowdown  calculation  (in/sec) . 


UBRFZ 


Distance  from  breech  at  which  UBRF  is  determined  (in) . 


CDMUZ 


Discharge  coefficient  for  muzzle  discharge  (-) . 
If  CDMUZ  <  10‘10,  it  defaults  to  1.0. 
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File  [M13]  "Projectile  and  Rifling  Characteristics"  (4F10.0)  One  Card 

N.B.  This  file  is  not  required  if  NTC  or  NTLC  =  1.  (See  File  [M2].) 

ZBPR  Initial  axial  location  of  base  of  projectile  relative  to 

breech  (in) . 

WTPR  Mass  of  projectile  (lbm) . 

PRIN  Polar  moment  of  inertia  of  projectile  (lbm-in2)  . 


RIF  Angle  of  rifling  (°). 

ABPROJ  Base  area  of  projectile  (in2)  .  If  ABPROJ  >  10'10  it  will 

be  used  as  the  propulsion  area  for  the  projectile  whenever 
it  is  less  than  the  bore  area  at  the  base. 


TUBEM 


Mass  of  recoiling  parts  of  gun  (lbm)  .  If  TUBEM  is  zero, 
recoil  of  the  tube  is  not  considered. 


File  [C18]  "I-th  Forward  Compactible  Filler  Element  Properties" 
(3F10.0) ,215)  One  Card 

N.B.  File  required  if  and  only  if  NEL  *  0.  (See  File  [M4] . )  File  is 
repeated  NEL  times . 


XEL(I) 


Position  of  left-hand  boundary  of  I-th  element  (in) .  The 
array  must  be  well  ordered  with  respect  to  I.  We  require 
XEL(I)  £  XEL(I-l) .  Forward  elements  are  ordered  so  that  the 
first  is  to  the  left. 


MEL (I) 

FEL(I) 
NTYPE (I) 


Mass  of  I-th  element  (lbm)  .  If  <  10'10  element  is 
interpreted  as  a  space.  MEL  (I )  must  be  greater  than  10'  . 

Initial  resistance  to  motion  of  I-th  element  (lbf) . 

If  NTYPE (I)  =  0,  element  is  treated  as  perfectly  plastic 
(deformation  under  loading  only) . 

If  NTYPE (I)  =  1,  element  is  treated  as  elastic. 

If  NTYPE (I)  =  2,  element  is  treated  as  rigid. 

If  NTYPE (I)  =  3,  element  is  treated  as  incompressible. 

0  <;  NTYPE  (I)  £  3. 

Number  of  pairs  of  entries  in  stress-strain  table  of  I-th 
element.  0  <;  NDATA(I)  s  10. 


NDATA(I) 


File  [C19]  "Constitutive  Data  for  I-th  Forward  Element"  (8F10.0) 
One  to  Three  Cards 


N.B.  File  required  if  and  only  if  MEL  (I )  >  1CT10  and  NTYPE(I)  <  2.  (See 

File  [C18]  . )  File  is  repeated  for  each  element  for  which  NDATA  >  0. 
Files  [C19] ,  as  a  group,  follow  Files  [C18] ,  as  a  group, 

YEL(I,1)  First  engineering  strain  taken  positive  in  compression 

(dimensionless)  .  Must  be  zero. 

RESEL(I,1)  Corresponding  stress  taken  positive  in  compression  (psi) . 


RESEL ( I , NDATA ( I ) )  Last  engineering  stress.  Should  exceed  maximum  pressure 

in  gun. 


The  array  YEL  must  be  well  ordered.  All  entries  must  be  in  the 
interval  [0,1]. 

The  array  RESEL  must  have  non-zero  entries  and  must  be  non-decreasing 
for  each  element. 


File  [C19.1]  "I-th  Rear  Compactible  Filler  Element  Properties"  (3F10. 0,215) 
One  Card 


N.B.  File  required  if  and  only  if  NBL  *  0.  (See  File  [M4].)  File  is 
repeated  NBL  times. 


XBL(I) 


MBL(I) 

FBL(I) 

NTYPB(I) 


NDATB(I) 


Position  of  right-hand  boundary  of  I-th  element  (in).  The 
array  must  be  well  ordered  with  respect  to  I.  XBL(I) 
observes  the  opposite  convention  from  that  of  XEL(I),  that 
is  XBL(I)  £  XBL(I-l)  for  all  I.  Rear  elements  are  tabulated 
so  that  the  first  is  to  the  right. 

Mass  of  I-th  element  (lbm)  .  If  <  10-1°  element  is 
interpreted  as  a  space.  MBL(I)  must  be  greater  than  10'xo. 

Initial  resistance  to  motion  of  I-th  element  (lbf ) . 

If  NTYPB(I)  =  0,  element  is  treated  as  perfectly  plastic 
(deformation  under  loading  only) . 

If  NTYPB(I)  =  1,  element  is  treated  as  elastic 

If  NTYPB(I)  =2,  element  is  treated  as  rigid. 

If  NTYPB(I)  =  3,  element  is  treated  as  incompressible. 

0  <5  NTYPB(I)  <;  3. 

Number  of  pairs  of  entries  is  stress-strain  table  of  I-th 
element.  0  <;  NDATB(I)  <;  10. 
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File  [C19.2]  "Constitutive  Data  for  I-th  Rear  Element"  (8F10.0) 

One  to  Three  Cards 

N.B.  File  required  if  and  only  if  MEL  (I)  >  10"10  and  NTYPE  (I ^  <  ^ “  (See 

File  [C19 .  1]  . )  File  is  repeated  for  each  element  for  which  NDATB  >  0. 
Files  [C19 .  2  ] ,  as  a  group,  follow  Files  [C19.1],  as  a  group. 

YBL(I,1)*  First  engineering  strain  taken  positive  in  compression 

(dimensionless) .  Must  be  zero. 

RESBL (1,1)**  Corresponding  stress  taken  positive  in  compression  (psi) . 


RESBL ( I , NDATB ( I ) )  Last  engineering  stress.  Should  exceed  maximum  pressure 

in  gun. 

*  The  array  YBL  must  be  well  ordered.  All  entries  must  be  in  the 
interval  [0,1]. 

**  The  array  RESBL  must  have  non-zero  entries  and  must  be  non-decreasing 
for  each  element. 


File  [C23]  "Positions  for  Pressure  Table  Storage"  (8F10.0)  One  Card 
N.B.  File  required  if  and  only  if  NZPT  *  0.  (See  File  [M4].) 

ZPT(l)  First  position,  relative  to  breech  (in). 


ZPT (NZPT) *  Last  position. 

*  Output  consists  of  tables  of  pressure  at  each  of  the  NZPT  positions 
together  with  value  less  that  at  the  NZPTth  position. 


File  [C23.01]  "Projectile  Afterbody  Pressure  History  Option"  (1615) 
One  Card 


N.B.  File  required  if  and  only  if  NZPT  *  0  and  MODET  -  1.  (See  File  [M4].) 

IZPT(l)  0  if  ZPT(l)  is  fixed  in  the  tube  reference  frame. 

•  1  if  ZPT(l)  is  fixed  in  the  projectile  afterbody 

•  reference  frame. 


IZPT(NZPT) 

MODZPT 


0  if  gas  pressure  is  tabulated. 

1  if  intergranular  stress  is  tabulated. 

2  if  sum  of  pressure  and  intergranular  stress  is  tabulated. 


File  [C23.1]  "Kinetics  Option  Counters"  (315)  One  Card 


N.B.  File  required  if  and  only  if  KMODE  *  0.  (See  File  [M2].) 


NSPEC 

NGASR 


NSOLR 

KEOS 


NPVAR(l) 


Number  of  species.  1  £  NSPEC  £  10. 

Number  of  reactions  occurring  in  the  mixture  of  combustion 
products.  0  £  NGASR  <;  10.  If  NGASR  >  0,  File  [C23.7]  is 
required. 

Number  of  reactions  occurring  in  the  solid-propellant. 

0  <;  NSOLR  10.  If  NSOLR  >  0 ,  File  [C23.8]  is  required. 

0  if  thermal  energy  formulation  is  used. 

1  if  total  energy  formulation  is  used. 

Data  as  per  NASA  SP-273  and  the  present  File  [C23.2] 
is  replaced  by  File  [C23.21] .  Values  of  ECHO  are 
to  be  entered  as  heat  of  formation  and  not  as  heat 
released  in  near  field  combustion  zone,  see  Files 
[C23 . 3] ,  [C23.31],  [C23.4]  and  [C23.41]. 

This  option  is  presently  confined  to  gas-phase  species. 
ECHO  for  chemical  energy  not  required. 

Number  of  data  to  specify  composition  of  local  products 
of  first  propellant.  NPVAR  may  be  zero,  in  which  case 
the  present  file  [C23.3]  is  used  or  it  may  be  between 

2  and  20,  in  which  case  new  file  [C23.31]  is  required. 


NPVAR  (NPROP)  Data  for  last  propellant. 

NPVAR (NPROP+1)  Data  for  igniter  composition.  Note  that  if  NPROP 
is  1,  this  item  goes  in  the  sixth  field.  If  it 
is  0,  present  File  [C23.4]  is  required,  otherwise 
we  require  [C23.41J. 
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File  [C23.2]  "Properties  of  Species"  (2A4, IX, Al, 6F10 . 0)  NSPEC  Cards 

N.B.  File  required  if  and  only  if  KMODE  *  0  (See  File  [M2])  and  KEOS  =  0 
(See  File  [C23.1] ) . 

SPCNAM (I )  Name  of  species,  up  to  8  alphanumeric  characters. 

FAZE  (I)  Phase  of  species:  G  =  gas  or  vapor;  L  =  liquid;  S  =  solid. 

One  alphanumeric  character. 

SPCV(I)  Specific  heat  at  constant  volume  (Ibf-in/lbm-R) . 

SPCP(I)  Specific  heat  at  constant  pressure  (Ibf-in/lbm-R) . 

SPBV(I)  Covolume  (inVlbm)  .  Only  required  if  FAZE  =  G. 

SPMOL(I)  Molecular  weight  (Ibm/lbmol)  .  Only  required  if  FAZE  =  G. 

SPDEN(I)  Density  (lbm/in3)  .  Only  required  if  FAZE  =  L  or  S. 

CLOS(I)  Transfer  coefficient  in  correlation  for  rate  of  deposition 

of  condensed  species  on  surface  of  solid  propellant 
(sec/in2).  Only  required  if  FAZE  =  L  or  S. 

If  CLOS  =  0,  the  rate  of  deposition  is  zero. 

File  [C23.21]  "Properties  of  Species  in  NASA  SP-273  Formulation" 

(A10, 5F10 . 0/5E15.8/5E15.8/5E15.8)  4*NSPEC  cards 

N.B.  The  data  consist  of  4  cards  for  each  of  the  NSPEC  species. 

SPCNAM (I)  Name  of  species  I.  Up  to  10  characters. 

TLO(I)  Lower  limit  of  data  (K)  . 

TSW(I)  Switching  point  of  data  (K)  . 

THI(I)  Upper  limit  of  data  (K) . 

SPBV(I)  Covolume  (in**3/lbm)  . 

SPMOL(I)  Molecular  weight  (Ibm/lbmol). 

A(l,  I)  First  NASA  SP  datum  for  specific  heat.  New  card. 

A(5, I) 

A(6,I)  Sixth  datum.  New  card. 

A(10, I) 
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A(ll, I) 


Eleventh  datum.  New  card. 


A(15, I ) 

N.B.  TLO  and  THI  are  not  presently  checked  when  subroutine  CALEOS  is 
called.  The  user  may  want  to  include  an  appropriate  test  and  subsequent 
message/action.  This  file  is  actually  read  by  CALEOS  rather  than  NOVSUB  in 
order  to  make  it  easier  for  the  user  to  make  revisions. 


N.B.  The  following  File  [C23.3]  is  repeated  NPROP  times,  once  for  each  type 
of  solid  propellant. 

File  [C23.3]  "Composition  of  Propellant  Near  Field  Combustion  Products" 
(8F10.0)  NPROP  to  2*NPR0P  Cards 

N.B.  File  required  if  and  only  if  KMODE  *  0  (See  File  [M2]) 
and  NPVAR(I)  =  0  (See  File  [C23.1]). 


ECHO (I) 

YO (1, 1) 


Chemical  energy  released  in  near  field  combustion 
(lbf-in/lbm)  . 

Mass  fraction  of  near  field  combustion  products 
corresponding  to  species  type  1  (-) . 


YO (I,NSPEC) 


Mass  fraction  of  near  field  combustion  products 
corresponding  to  species  type  NSPEC  (-) . 


File  [C23.31]  "Pressure  Dependent  Composition  of  Propellant  Near  Field 
Combustion  Products"  (F10 . 0/ (8F10 . 0) ) 

1+NPROP  to  1+2* NPROP  cards . 


N.B.  File  required  if  and  only  if  KMODE  *  0  (See  File  [M2] )  and 
NPVAR(I)  *  0  (See  File  [C23.1]). 


ECHO (I) 


PVAR  (1 , 1) 


Chemical  energy  released  in  near  field 
combustion  (KEOS=0)  or  heat  of  formation 
of  propellant  (KEOS=l)  (lbf-in/lbm) . 

First  value  of  pressure,  (psi) .  New  card. 


YOVAR (1,1,1) 


Corresponding  mass  fraction  of  first  species 
in  near  field  combustion  (-) . 


YOVAR (I, INS PEC)  Mass  fraction  of  last  species. 
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PVAR  (I,  2) 


Second  value  of  pressure.  New  card. 


YOVAR  (I,NPVAR  (I)  , NS PEC) 

N.B.  Inside  the  table  range  YOVAR  is  linearly  interpolated. 
Outside,  the  first  or  last  set  of  values  are  used. 


File  [C23.4]  "Composition  of  Igniter  Discharge  Combustion  Products" 

(8 FI 0.0)  One  to  Two  Cards 

N.B.  File  required  if  and  only  if  KMODE  *  0  (See  File  [M2] )  and 
NPVAR(I)  =  0.  (See  File  [C23.1].) 

ECHO (I)  Chemical  energy  released  by  combustion  of  igniter  material 

prior  to  injection  (lbf-in/lbm)  . 

Y0 (I, 1)  Mass  fraction  of  igniter  products  corresponding  to  species 

type  1  (-) . 


Y0 (I, NS PEC)  Mass  fraction  of  igniter  products  corresponding  to  species 

type  NS PEC  (-) . 


FILE  [C23.41]  "Pressure  Dependent  Composition  of  Igniter  Discharge 
Combustion  Products"  (F10. 0/ (8F10. 0) ) 

1  +  NPROP  to  1  +  2*NPROP  cards 

N.B.  File  required  if  and  only  if  KMODE  *  0  (See  File  [M2] )  and 
NPVAR(I)  *  0.  (See  File  [C23.1].) 

ECHO (I)  Chemical  energy  released  in  near  field 

combustion  (KEOS=0)  or  heat  of  formation 
of  igniter  products  (KEOS=l)  (lbf-in/lbm)  . 

PVAR (1,1)  First  value  of  pressure,  (psi) .  New  card. 

YOVAR (I, 1,1)  Corresponding  mass  fraction  of  first  species 
in  near  field  combustion  (-) . 


YOVAR (I, INS PEC)  Mass  fraction  of  last  species. 

PVAR (I, 2)  Second  value  of  pressure.  New  card. 


YOVAR ( I , NPVAR (I)  , NSPEC) 


File  [C23.5]  "Composition  of  Initial  Ambient  Gas"  (8F10.0) 

One  to  Two  Cards 

N.B.  File  required  if  and  only  if  KMODE  *  0.  (See  File  [M2].) 


ECHO (I) 


YO (I, 1) 


Internal  energy  (thermal  component)  of  ambient  gas  (or 
mixture  if  condensed  species  are  initially  present) 
(lbf-in/lbm) . 

Mass  fraction  of  species  1  (-)  . 


YO (I, NSPEC)  Mass  fraction  of  species  NSPEC  (-) . 

N.B.  The  following  File  is  repeated  NPROP  times,  once  for  each  type  of 
solid  propellant.  Present  storage  limits  only  support  the  case 
NPROP  =  1  with  KMODE  =2. 

File  [C23.6]  "Initial  Composition  of  Solid  Propellant"  (8F10.0) 

NPROP  to  2*NPR0P  Cards 

N.B.  File  required  if  and  only  if  KMODE  =  2.  (See  File  [M2].) 

ECHO (I)  Inactive. 

Y 0 (1,1)  Mass  fraction  of  solid  propellant  corresponding  to  species  1 


YO (I, NSPEC)  Mass  fraction  of  solid  propellant  corresponding  to  species 
NSPEC  (-) . 


File  [C23.61]  "Composition  of  Traveling  Charge  Near  Field  Combustion 
Products"  (8F10.0)  One  to  Two  Cards 

N.B.  File  required  if  and  only  if  KMODE  *  0  and  NTC  =  1.  (See  File  [M2].) 

ECHTCO  Chemical  energy  released  in  near  field  combustion  of 

traveling  charge  (lbf-in/lbm)  . 


YTC0(1) 


Mass  fraction  of  species  1  (-)  . 


YTCO (NSPEC)  Mass  fraction  of  species  NSPEC  (-) . 
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File  [C23.62]  "Types  of  Reactions  in  Mixture  of  Combustion  Prooducts" 
(1015)  *  One  Card 

N.B.  File  required  if  and  only  if  KMODE  *  0,  NGASR  *  0  and  NTC  =  1.  (See 
Files  [M2]  and  [C23.1].) 

KRCTYP ( 1 )  If  0,  reaction  1  is  of  the  Arrhenius  type  and  is  described 

by  File  [C23.7] . 

•  If  1,  reaction  1  is  of  the  pressure  dependent  type  and  is 

•  described  by  File  [C23.71]. 

If  NTC  =  0/  KRCTYP (I)  defaults  to  zero  for  all  I. 


KRCTYP  (NGASR)  Type  of  reaction  NGASR. 


File  [C23.63]  "Species  Thermal  Equilibrium  Switches"  (1015)  One  Card 

N.B.  File  required  if  and  only  if  KMODE  *  0,  NGASR  *  0  and  NTC  =  1. 

(See  Files  [M2]  and  [C23.1].) 

KTEQL(l)  If  0 ,  species  1  is  assumed  to  be  in  constant  thermal 

equilibrium  with  mixture  of  combustion  products. 

•  If  1,  species  1  is  assumed  to  be  thermally  insulated  from 

mixture  of  combustion  products.  If  NTC  =  0,  KTEQL(I) 
defaults  to  zero  for  all  I . 


KTEQL (NS PEC)  Thermal  equilibration  switch  for  species  NSPEC. 


File  [C23.7]  "Description  of  Arrhenius  Reactions  in  Mixture  of  Combustion 
Products"  (81 5/ 8 FI 0.0/ FI 0.0,  D10 . 4 , F10.0,D10.4, 4F10. 0/F10 . 0) 
Four  Cards  For  Each  Such  Reaction 

N.B.  File  required  if  and  only  if  KMODE  *  0,  NGASR  *  0  and  KRCTYP  (I)  =  0. 
(See  Files  [M2],  [C23.1]  and  [C23.62].) 

KRCNTB (1,1)*  Pointer  to  first  species  acting  as  a  reactant  in  reaction  I. 
0  £  KRCNTB  £  NSPEC. 


KRCNTB (4,1)  Pointer  to  fourth  species  acting  as  a  reactant  in 

reaction  I. 

KPRODB (1,1)*  Pointer  to  first  species  acting  as  a  product  in  reaction  I. 
0  <;  KPRODB  5  NSPEC. 


KPRODB (4, I)  Pointer  to  fourth  species  acting  as  a  product  in  reaction  I. 
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STOIBCL,  I) 


Stoichiometric  coefficient  corresponding  to  first  reactant 
species  (-) .  Starts  a  new  card. 


STOIB (4,1) 


Stoichiometric  coefficient  corresponding  to  fourth  reactant 
species  (-) . 


STOIB (5  / 1 ) 


Stoichiometric  coefficient  corresponding  to  first  product 
species  (-) . 


STOIB (8,1) 


Stoichiometric  coefficient  corresponding  to  fourth  product 
species  (-) . 


ECHB(I) 


Chemical  energy  released  by  reaction  (lbf-in/lbm) .  Starts  a 
new  card. 


ARCB(I) 


Pre-exponential  factor  in  Arrhenius  rate  law  (units  yield 
lbmol/in3-sec)  . 


ARXB(I) 
AREB(I) 
AROB (1,1) 


Temperature  exponent  in  Arrhenius  rate  law  (-)  . 

Activation  energy  in  Arrhenius  rate  law  (lbf-in/lbmol)  . 

Order  of  reaction  with  respect  to  concentration  of  first 
reactant  species  (-) . 


AROB (4, I) 


Order  of  reaction  with  respect  to  concentration  of  fourth 
reactant  species  (-) . 


AROB (5,1) 


Order  of  reaction  with  respect  to  concentration  of  gas- 
phase  (-) .  Starts  a  new  card. 


The  most  general  reaction  supported  involves  four  reactant  and  four 
product  species.  At  least  one  reactant  pointer  and  one  product  pointer 
must  be  different  from  zero.  A  zero  entry  simply  implies  a  reduction  in 
generality  of  the  reaction. 
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File  [C23.71]  "Description  of  Pressure-Dependent  Reactions  in  Mixture  of 
Combustion  Products”  (8I5/8F10. 0/8F10 . 0) 

Three  Cards  For  Each  Such  Reaction 

N.B.  File  required  if  and  only  if  KMODE  *  0,  NGASR  *  0  and  KRCTYP(I)  =  1. 
(See  Files  [M2],  [C23.1]  and  [C23.62].) 

KRCNTB (1,1)*  Pointer  to  first  species  acting  as  a  reactant  in  reaction  I • 
0  <;  KRCNTB  <;  NSPEC. 


KRCNTB (4,1)  Pointer  to  fourth  species  acting  as  a  reactant  in 

reaction  I. 

KPRODB (1,1)*  Pointer  to  first  species  acting  as  a  product  in  reaction  I. 
0  <;  KPRODB  $  NSPEC. 


KPRODB (4,1)  Pointer  to  fourth  species  acting  as  a  product  in  reaction  I. 

STOIB (1/ I)  Stoichiometric  coefficient  corresponding  to  first  reactant 

species  (-)  .  Starts  a  new  card. 


STOIB (4, I)  Stoichiometric  coefficient  corresponding  to  fourth  reactant 

species  (-)  . 

STOIB (5/1)  Stoichiometric  coefficient  corresponding  to  first  product 

•  species  (-)  . 


STOIB (8, I)  Stoichiometric  coefficient  corresponding  to  fourth  product 

species  (-)  . 

ECHB(I)  Chemical  energy  released  by  reaction  (lbf-in/lbm) .  Starts  a 

new  card. 

DIAB(I)  Particle  diameter,  assumed  constant  (in). 

BIB (I )  Burn  rate  additive  constant  (in/sec). 

B2B (I )  Burn  rate  pre-exponential  factor  (in/sec-psi6"®)  . 

BNB(I)  Burn  rate  exponent  (-)  . 

*  The  most  general  reaction  supported  involves  four  reactant  and  four 

product  species.  At  least  one  reactant  pointer  and  one  product  pointer 
must  be  different  from  zero.  A  zero  entry  simply  implies  a  reduction  in 
generality  of  the  reaction. 
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File  [C23.8]  MDescription  of  Reactions  in  Solid  Propellant” 

(8I5/8F10.0/F10.0,D10.4,F10.0,D10.4,  4F10. 0)  3*NSOLR  Cards 

N.B.  File  required  if  and  only  if  KMODE  *  0,  NSOLR  *  0.  (See  Files  [M2] 
and  [C23 .  1]  . ) 

KRCNTS (1,1)*  Pointer  to  first  species  acting  as  a  reactant  in  reaction  I. 
0  <;  KRCNTS  5  NSPEC. 


KRCNTS (4,1)  Pointer  to  fourth  species  acting  as  a  reactant  in  reaction 

I. 

KPRODS (1,1)*  Pointer  to  first  species  acting  as  a  product  in  reaction  I. 
0  £  KPRODS  S  NSPEC. 


KPRODS (4, I)  Pointer  to  fourth  species  acting  as  a  product  in  reaction  I. 

STOIS (1,1)  Stoichiometric  coefficient  corresponding  to  first  reactant 

•  species  (-) .  Starts  a  new  card. 


STOIS ( 4/ I )  Stoichiometric  coefficient  corresponding  to  fourth  reactant 

species  (-)  . 

STOIS (5,1)  Stoichiometric  coefficient  corresponding  to  first  product 

*  species  (-) . 


STOIS (8, I)  Stoichiometric  coefficient  corresponding  to  fourth  product 

species  (~) . 

ECHS(I)  Chemical  energy  released  by  reaction  (lbf-in/lbm)  .  Starts  a 

new  card. 

ARCS (I)  Pre-exponential  factor  in  Arrhenius  rate  law  (units  yield 

lbm/in3-sec)  . 

ARXS(I)  Temperature  exponent  in  Arrhenius  rate  law  (-)  . 

ARES  (I)  Activation  energy  in  Arrhenius  rate  law  (lbf-in/lbmol)  . 
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AROS (1,1) 


Order  of  reaction  with  respect  to  concentration  of  first 
reactant  species  (-) . 


AROS (4, I) 


Order  of  reaction  with  respect  to  concentration  of  fourth 
reactant  species  (-)  . 


*  The  most  general  reaction  supported  involves  four  reactant  and  four 

product  species.  At  least  one  reactant  pointer  and  one  product  pointer 
must  be  different  from  zero.  A  zero  entry  simply  implies  a  reduction  in 
generality  of  the  reaction. 


File  [C23.9]  "Solid  Propellant  Thermal  Response  Parameters" 
(315, 2D10. 4/ 3F10. 0)  One  Card 


N.B.  File  required  if  and  only  if  KMODE  =  2.  (See  File  [M2].) 


NZC 

NZCBC 

NOFLAM 

AS 

ES 

TSEN 

TTRANS 

PTRANS 


Number  of  stations  for  analysis  of  thermal  response  of  solid 
propellant.  0  <;  NZC  s  21.  It  is  presently  assumed  that 
only  one  propellant  region  is  present. 

If  0,  pyrolysis  law  is  assumed  to  govern  regression  of 
surface  of  solid  propellant. 

If  1,  evaporative  (Clausius  Clapeyron)  law  is  assumed  to 
govern  regression  of  surface  of  solid  propellant. 

If  0,  heat  feedback  from  the  gas-phase  is  considered 
according  to  Zel'dovitch  formulism. 

If  1,  heat  feedback  from  the  gas-phase  is  neglected. 

Pre-exponential  factor  in  solid  propellant  surface 
regression  law.  If  NZCBC  =  0,  units  are  in/sec. 

If  NZCBC  =  1,  units  are  psi. 

Activation  energy  (NZCBC  =  0)  or  heat  of  vaporization 
(NZCBC  =  1)  in  solid  propellant  surface  regression  law 
(lbf-in/lbmol) . 

Temperature  sensitivity  of  propellant  steady  state  burn  rate 
(1/R) • 

Time  interval  over  which  external  stimulus  drops  to  zero 
following  ignition  of  the  surface  of  the  propellant  (sec) . 

Pr6ssur£  above  which  thermal  analysis  is  discontinued  and 
steady  state  combustion  is  assumed  to  occur  (psi) . 


123 


File  [02 4]  "Parameters  to  Define  Mesh  in  Invariant  Embedding  Analysis" 
(F10. 0,315)  One  Card 

N.B.  File  required  if  and  only  if  KMODE  =  2.  (See  File  [M2].) 

DELX*  Mesh  spacing  in  group  closest  to  heated  surface  (sec1/2) 

DELX  >0. 

N**  Number  of  intervals  per  group. 

MDELX  Integer  multiple  by  which  mesh  spacing  increases  from  group 

to  group  as  we  move  away  from  heated  surface. 

NGRP  Number  of  groups.  1  s  NGRP  s  10. 

*  Refers  to  computational  coordinate  x^a  where  x  is  the  distance  from 
heated  surface  and  a  is  thermal  diffusivity. 

**  N*NGRP  S  200. 


File  [C25]  "Tank  Gun  Option  Control  Data"  (1615)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1.  (See  File  [M2].) 

Number  of  pairs  of  data  to  describe  projectile  afterbody. 
NAFT  may  be  zero.  Otherwise  2  £  NAFT  <;  10. 

Switch  to  define  level  of  modeling  of  surface  source  term 
attributed  to  tube  wall. 

JIS(l)  Model 

0  No  source  term 

1  Tabular  source  term 

2  Rate  of  source  determined  according 

to  ignition  and  combustion  submodels. 

JIS (2 )  Switch  to  define  level  of  modeling  of  surface  source  term 

attributed  to  centerline  of  tube. 

JIS (3)  Switch  to  define  level  of  modeling  of  surface  source  term 

attributed  to  afterbody  of  projectile. 

NENDL  Number  of  endwalls  defined  by  packaging  of  charge. 

0  s  NENDL  £  21 . 


NAFT 

JIS(l) 
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NPRM 

Number  of  permeability  data  sets.  0  £  NPRM  £  10. 

NRCT 

Number  of  reactivity  data  sets.  0  £  NRCT  £  9. 

NSEGS(l) 

Number  of  segments  having  different  properties  in  tube  wall 
surface  source.  0  s  NSEGS (1)  s  3.  Default  value  is  1. 

NSEGS (2) 

Number  of  segments  in  centerline  surface  source. 

- 

NSEGS (3) 

Number  of  segments  in  afterbody  surface  source. 

. 

KCTRL 

If  0/  control  charge  not  present. 

If  1,  control  charge  is  present.  Files  [C28]  -  [C28.7] 
required. 

NZCRE 

Number  of  data  to  describe  external  geometry  of  ballistic 
control  tube. 

INHBCR ( 1 ) 

If  0,  control  charge  not  deterred. 

If  1,  control  charge  is  deterred. 

NABDIS 

If  0,  discontinuity  in  area  at  base  of  afterbody  is 
represented  implicitly. 

If  1,  discontinuity  in  area  at  base  of  afterbody  is 
represented  explicitly  as  a  discontinuity. 

File  [C25.ll]  is  required. 

File  [C25. 

1]  "Geometry  of  Projectile  Afterbody"  (8F10.0)  One  to  Three 

Cards 

N.B.  File 
(See 

required  if  and  only  if  MODET  =  1  and  NAFT  £  2. 

Files  [M2]  and  [C25] . ) 

ZAFT (1) * 

First  axial  position  on  afterbody  (in) . 

RAFT  (1) 

Corresponding  radius  of  afterbody  (in) . 

ZAFT(NAFT) 

Last  axial  position. 

RAFT (NAFT) 

Corresponding  radius  of  afterbody. 

*  The  origin  of  the  coordinate  ZAFT  is  independent  of  that  used  to  describe 
the  gun  tube.  XKTC  internally  reconciles  the  coordinate  frames  by 
assuming  that  ZAFT(NAFT)  coincides  with  ZBPR.  (See  File  [M13] . ) 
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[C25.ll]  "Spatial  Resolution  Factor  for  Analysis  of  Base  of  Afterbody 
as  Surface  of  Area  Discontinuity"  (F10.0)  One  Card 

N.B.  This  file  is  required  if  and  only  if  MODET  =  1  and  NABDIS  =  1. 

(See  File  ([C25].) 


RZOLV2 


Spatial  resolution  factor  (-) .  Recommended  value  is  s  0.01. 
It  should  be  noted  that  this  datum  is  completely  independent 
of  RZOLV  (File  [M3] )  .  RZOLV2  is  used  to  determine  the 
maximum  proximity  of  a  mixture  boundary  to  the  base  of  the 
projectile. 


N.B.  The  following  Files,  [C25.2]  through  [C26.3]  are  repeated,  as  needed, 
as  a  group  for  each  of  the  three  types  of  reactive  layers  whose 
presence  is  indicated  by  a  non-zero  value  of  JIS(I). 

(See  File  [C25] . ) 


File  [C25.2]  "Thickness  and  Density  Counters  for  Reactive  Layer  I"  (415) 
One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  *  0. 

(See  Files  [M2]  and  [C25] . ) 

NSTAC(I)  Number  of  data  to  describe  thickness  of  reactive  layer  I. 

2  s  NSTAC(I)  <;  10. 

NRHOS(I,l)  Number  of  data  to  describe  density  of  first  segment  of 

reactive  layer  I  as  a  function  of  pressure. 

1  s  NRHOS(I)  s  10. 

NRHOS(I,2)  Number  of  data  for  second  segment  of  reactive  layer  I. 

NRHOS(I,3)  Number  of  data  for  third  segment. 


File  [C25.3]  "Thickness  of  Reactive  Layer  I"  (8F10.0)  One  to  Three  Cards 

N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  *  0. 

(See  Files  [M2]  and  [C25] . ) 

ZAC (1,1)*  First  axial  position  (in). 

THC(1, I)  Corresponding  thickness  of  reactive  layer  (in). 


ZAC (NSTAC ( I ) ,  I )  Last  axial  position. 

THC (NSTAC ( I ) ,  I )  Corresponding  thickness. 

When  I  =  1  or  2,  ZAC  is  assumed  to  refer  to  the  coordinate  system  used 
to  define  the  tube  geometry.  When  1=3,  ZAC  is  assumed  to  correspond 
to  the  coordinate  system  used  to  define  the  afterbody  of  the  projectile 
The  thickness  of  layer  I  is  taken  to  be  zero  outside  the  table  range. 
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File  [C25.31]  "Segment  Pointers  for  Reactive  Layer  I"  (815)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1,  JIS(I)  *  0  and  NEGS(I)  >  1. 
(See  Files  [M2]  and  [C25].) 

NSG(1,I)  Segment  property  type  for  axial  positions  between  ZAC (1,1) 

*  and  ZAC (2,1). 


NSG (NSTAC (I) -1, 1 )  Segment  property  type  for  axial  positions  between 

ZAC (NSTAC (I) -1, 1 )  and  ZAC  (NSTAC (I) , I) . 

NSG (NSTAC (I) , I)  Not  used. 


N.B.  If  Reactive  Layer  I  consists  of  more  than  one  segment,  the  following 

Files  [C25.4]  through  [C26.21]  are  repeated  as  a  group  for  each  of  the 
segments  of  the  layer.  The  subscript  pertaining  to  the  segment  is 
suppressed  in  the  following  discussion. 


File  [C25.4]  "Density  of  Reactive  Layer  I"  (8F10.0)  One  to  Three  Cards 

N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  *  0. 

(See  Files  [M2]  and  [C25].) 

RHOS (1,1)*  Value  of  density  at  first  pressure  (lbm/in3) . 

PRHOS (1,1)  First  value  of  pressure  (psi) . 


RHOS (NRHOS (I) , I)  Last  value  of  density. 

PRHOS (NRHOS (I) , I)  Last  value  of  pressure. 


*  Outside  the  table  range,  the  first  or  the  last  value  of  RHOS  applies.  If 
a  single  value  is  specified,  the  density  is  taken  to  be  constant  and 
therefore  independent  of  pressure.  At  present,  case  compressibility  is 
only  modeled  if  JIS(I)  =  2.  (See  File  [C25].) 
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File  [C25.5]  "Counter  to  Describe  Discharge  of  Reactive  Layer  I"  (215) 
One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  =  1. 

(See  Files  [M2]  and  [C25].) 

IIS  (I)  Number  of  axial  positions  in  discharge  table. 

2  <;  IIS(I)  s  10. 

JJS(I)  Number  of  times  in  discharge  table.  2  £  JJS(I)  £  10. 


File  [C25.6]  "Times  to  Describe  Discharge  of  Reactive  Layer  I"  (8F10.0) 
One  to  Two  Cards 

N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  =  1. 

(See  Files  [M2]  and  [C25].) 

TPHIS (1,1)  First  time  (msec). 


TPHIS  ( JJS  (I) ,  I)  Last  time  (msec). 


File  [C25.7]  "Positions  to  Describe  Discharge  of  Reactive  Layer  I" 
(8F10.0)  One  to  Two  Cards 

N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  =  1. 

(See  Files  [M2]  and  [C25] . ) 

ZPHIS (1,1)*  First  position  (in). 


ZPHIS (IIS  (I) , I)  Last  position  (in). 

*  The  coordinate  frame  for  ZPHIS  is  assumed  to  accord  with  that  for  ZAC. 
(See  File  [C25.3].) 


File  [C25.8]  "Rate  of  Discharge  of  Reactive  Layer  I"  (8F10.0) 
One  to  Thirteen  Cards 

N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  -  1. 
(See  Files  [M2]  and  [C25].) 


PHIS (1,1, I) 


PHIS (2, 1,1) 


Rate  of  discharge  at  first  position  and  first  time 
(lbm/ in-sec)  . 

Rate  of  discharge  at  second  position  and  first  time. 


PHIS (IIS (I) ,1,1)  Rate  of  discharge  at  last  position  and  first  time. 

PHIS (1,2, I)  Rate  of  discharge  at  first  position  and  second  time. 

"  *  Starts  a  new  card. 


PHIS (IIS (I), JJS (I), I)  Rate  of  discharge  at  last  position  and  last  time. 


File  [C25.9]  "Burn  Rate  Counters  for  Reactive  Layer  I"  (215).  One  Card 

^TbT  File  required  if  and  only  if  MODET  -  1  and  JIS(I)  =2. 

(See  Files  [M2]  and  [C25] . ) 


KBRDS(I) 

KNHIB(I) 


KFACSF { I ) 


Number  of  burn  rate  data.  1  £  KBRDS  £  10. 

If  0,  layer  I  is  not  deterred. 

If  1,  layer  I  is  deterred 

If  0,  the  nominal  surface  area  is  used. 

If  2  5  KFACSF (I)  s  10,  the  surface  area  is  multiplied  by  a 
value  which  depends  on  surface  regression.  File  [C26.31] 
is  required. 
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File  [C26]  "Burn  Rate  Data  for  Reactive  Layer  I"  (8F10.0) 

One  to  Three  Cards 

N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  =  2. 

(See  Files  [M2]  and  [C25].) 

UPPRS (1,1)*  First  pressure  limit  (psi) . 

B22S(1,I)  Value  of  pre-exponent  for  pressures  less  than  UPPRS  (1,1) 

(in/sec-psi*"125)  . 

BNNS(1,I)  Value  of  exponent  for  pressures  less  than  UPPRS  (1,1)  (-)  . 

UPPRS (KBRDS (I) , I) *  Last  pressure  limit  (psi). 

B22S (KBRDS (I) , I)  Value  of  pre-exponent  for  pressures  less  than 

UPPRS (KBRDS (I)  ,  I)  but  greater  than  UPPRS (KBRDS (I ) -1, 1) . 

BNNS (KBRDS (I) , I)  Corresponding  exponent  (-) . 

Outside  the  table  range  the  first  and  last  values  are  used. 


File  [C26.1]  "Ignition  Data  for  Reactive  Layer  I"  (5F10.0)  One  Card 


N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  *  2. 
(See  Files  [M2]  and  [C25] . ) 


BIS ( I ) 
TMPIGS(I) 
KPS (I) 
ALPHAS  (I) 
ALFCC(I) 


Burn  rate  additive  constant  (in/ sec) . 
Ignition  temperature  (R) . 

Thermal  conductivity  (lbf/sec-R) . 
Thermal  diffusivity  (in2/sec) . 
Emissivity  factor  (-) . 


File  [C26.2]  "Thermochemical  Data  for  Reactive  Layer  I" 

N.B.  File  required  if  and  only  if  MODET  =  1  and  JIS(I)  = 
(See  Files  [M2]  and  [C25].) 

EIGS(I)  Chemical  energy  released  during  combustion 

GMS(I)  Molecular  weight  of  products  of  combustion 

GAMAS (I)  Ratio  of  specific  heats  (-) . 


(8F10.0)  One  Card 
1  or  2 . 

(lbf-in/lbm)  . 
(Ibm/lbmol)  . 
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File  [C26.21]  "Composition  of  Reactive  Layer  Near  Field  Combustion 
Products"  (8F10.0)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1,  KMODE  =  1  and  JIS(I)  =  1  or  2. 
(See  Files  [M2]  and  [C25].) 

YS0(I,1)  Mass  fraction  of  species  1  (-) . 


YSO (I,NSPEC)  Mass  fraction  of  species  NSPEC  (-)  . 


File  [C26.3]  "Properties  of  Deterred  Layer  of  Reactive  Layer  I"  (5F10.0) 
One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1,  JIS(I)  =  2  and  KNHIB(I)  =  1. 
(See  Files  [M2],  [C25]  and  [C25.9].) 


ECHIS(I)* 
ECHIS2 (I) 
RGFAS (I)* 
RGFAS2 ( I ) 

HIBS(I) 


Internal  energy  released  in  combustion  at  start  of  deterred 
layer  (lbf-in/lbm)  . 

Internal  energy  released  in  combustion  at  end  of  deterred 
layer  (lbf-in/lbm)  . 

Factor  by  which  burn  rate  is  multiplied  at  start  of  deterred 
layer  (-) . 

Factor  by  which  burn  rate  is  multiplied  at  end  of  deterred 
layer  (-) . 

Depth  of  deterred  layer  (in) . 


*  Values  within  deterred  layer  deduced  by  linear  spacewise  interpolation 
with  an  allowance  for  compression  of  the  reactive  layer.  Final  values 
need  not  be  the  same  as  those  of  the  undeterred  layer. 


File  [C26.31]  "Surface  Area  Multiplier  for  Reactive  Layer  I"  (2F10.0) 
KFACSF(I)  Cards 

N.B.  This  file  is  required  if  and  only  if  MODET  =  1  and  JIS(I)  =  2  and 
KFACSF(I)  i  2.  (See  Files  [M2],  [C25]  and  [C25.9].) 

DBITSF(1, I)  First  value  of  surface  regression  (in). 

RFACSF (1,1)  Corresponding  surface  area  multiplier  (-) . 

DBITSF(2,I)  Second  value  of  surface  regression.  Starts  a  new  card. 

RFACSF (KFACSF (I) , I)  Last  value  of  multiplier. 


131 


File  [C26.4]  "Endwall  Property  Pointers 


(615)  NENDL  Cards 


N.B.  File  required  if  and  only  if  MODET  =  1  and  NENDL  *  0. 

(See  Files  [M2]  and  [C25].) 

NBAGL(I)  Pointer  to  propellant  increment  to  which  I-th  endwall  is 

attached.  If  NBAGL(I)  “  0,  the  endwall  is  assumed  to  be 
attached  to  the  breech  of  the  gun.  An  increment  may  include 
several  parallel  packaged  bundles  of  propellant. 

NBAGE(I)  If  0,  endwall  is  at  rear  of  increment. 

If  1,  endwall  is  at  front  of  increment. 

NREACT ( I )  Pointer  to  reactivity  models  associated  with  endwall. 

NREACT  is  interpreted  as  a  four  digit  number.  Each  digit 
points  to  a  different  model.  A  zero  value  implies  no 
reactivity.  The  digits  have  the  following  meanings 


NPERM(I)  Pointer  to  permeability  model  associated  with  endwall. 

NPRAT(I)  If  0,  force  on  endwall  is  transmitted  to  propellant. 

If  1,  force  on  endwall  is  transmitted  to  projectile. 


File  [C26.5]  "Permeability  Model  Data"  (8F10.0)  NPRM  Cards 

N.B.  File  required  if  and  only  if  MODET  =  1  and  NPRM  *  0. 

(See  Files  [M2]  and  [C25] . ) 

PRM(I)  Initial  flow  resistance  coefficient  for  I-th  model  (-) . 

RUPSTR(I)  Pressure  differential  at  which  rupture  of  endwall  commences 

(psi) . 

RUPINT(I)  Time  interval  over  which  rupture  of  endwall  is  completed 

(msec)  . 


N.B.  The  following  Files,  [C26.6]  through  [C27],  are  repeated  as  a  group 
for  each  of  the  NRCT  reactivity  models. 


File  [C26.6]  "File  Counters  for  I-th  Reactivity  Model”  (315)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  NRCT  *  0. 

(See  Files  [M2]  and  [C25].) 

KBRDE(I)  Number  of  data  in  modeled  burn  rate  description  {-)  . 

If  KBRDE(I)  =  0,  it  is  assumed  that  tabular  discharge  data 
are  specified.  0  s  KBRDE(I)  £  10. 

IGCRIT (I )  Ignition  criterion  for  modeled  burn  rate  description. 

Ignition  is  determined  by  reference  to  VALIG(I) 

(File  [C26.8])  as  follows. 

VALIG(I) 

Time  Delay  (msec) 

Ambient  gas  temperature  (R) 

Neighboring  propellant  temperature  (R) 

jrct(I)  Number  of  data  in  tabular  burn  rate  description  (-)  . 

JRCT(I)  =  0  or  2  <;  JRCT(I)  <;  8. 


File  [C26.7]  ”Thermochemical  Data  for  I-th  Reactivity  Model”  (4F10.0) 
One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  NRCT  *  0. 

(See  Files  [M2]  and  [C25].) 

RHOE(I)  Density  (lbm/in3)  . 

EIGE(I)  Chemical  energy  released  during  combustion  (Ibf-in/lbm) . 

Gme(I)  Molecular  weight  of  combustion  products  (Ibm/lbmol) . 

GAMAE(I)  Ratio  of  specific  heats  of  combustion  products  (-) . 


File  [C26.71]  "Composition  of  Near  Field  Combustion  Products  of  I-th 
Reactivity  Model”  (8F10.0)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1,  KMODE  *  0  and  NRCT  *  0. 
(See  Files  [M2]  and  [C25].) 

YEE (1,1)  Mass  fraction  of  species  1  (-) . 


YEE (I, NS PEC)  Mass  fraction  of  species  NSPEC  (-) . 


IGCRIT (I) 
1 
2 
3 
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File  [C26.8]  "Ignition  Value  for  I-th  Reactivity  Model"  (F10.0)  One  Card 


N.B.  File  required  if  and  only  if  MODET  =  1,  NCRT  *  0  and  KBRDE(I)  *  0. 
(See  Files  [M2],  [C25]  and  [C26.6].) 

VALIG(I)  Value  of  time  delay  (msec),  gas  temperature  (R)  or 

propellant  temperature  (R)  in  accordance  with  IGCRIT(I)  as 
defined  above.  (See  File  [C26.6].) 


File  [C26.9]  "Burn  Rate  Data  for  I-th  Reactivity  Model"  (8 FI 0.0) 

One  to  Three  Cards 

N.B.  File  required  if  and  only  if  MODET  =  1,  NRCT  *  0  and  KBRDE(I)  *  0. 
(See  Files  [M2],  [C25]  and  [C26.6].) 

UPPRE (1,1)*  First  pressure  limit  (psi) . 

B22E (1,1)  Value  of  pre-exponent  for  pressures  less  than  UPPRE(1,I) 

(in/sec-psi®*0*)  . 

BNNE (1,1)  Value  of  exponent  for  pressures  less  than  UPPRE (1,1)  (-)  . 

UPPRE (KBRDE (I) , I) *  Last  pressure  limit  (psi). 

B22E  (KBRDE  (I) ,  I)  Value  of  pre-exponent  for  pressures  less  than 

UPPRE ( KBRDE ( I ) ,  I ) ,  but  greater  than 

UPPRE (KBRDE (I) -1,1) . 

BNNE ( KBRDE (I) , I)  Corresponding  exponent  ( - ) . 

*  Outside  the  table  range  the  first  and  last  values  are  used. 


File  [C27]  "Tabular  Description  of  I-th  Reactivity  Model"  (8F10.0) 

One  or  Two  Cards 

N.B.  File  required  if  and  only  if  MODET  *  1,  NRCT  *  0,  KBRDE (I)  =  0  and 
2  <;  JRCT  <;  8.  (See  Files  [M2],  [C25]  and  [C26.6].) 

TRCT  (1,1)  First  value  of  time  (msec). 

FLORCT  (1,1)  Corresponding  rate  of  combustion  (lbm/in2-sec)  . 

TRCT  (JRCT (I) , I)  Last  value  of  time. 

FLORCT (JRCT (I) , I)  Corresponding  rate  of  combustion. 
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File  [C28]  "Internal  Properties  of  Control  Charge  Combustion  Chamber" 
(4F10.0)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  KCTRL  *  0. 

(See  Files  [M2]  and  [C25].) 

CDCR  Discharge  coefficient  for  venting  to  gun  chamber  (-) . 

RCRI  Internal  radius  of  bore  (in) . 

VCRO  Initial  chamber  volume  corresponding  to  zero  afterbody 

offset  (in3) . 

ZCRO  Initial  afterbody  offset  (in) . 

File  [C28.1]  "External  Properties  of  Control  Charge  Combustion  Chamber" 
(3F10.0)  NZCRE  Cards 

N.B.  File  required  if  and  only  if  MODET  =  1  and  KCTRL  *  0. 

(See  Files  [M2]  and  [C25] . ) 

ZCRE(l)  First  axial  position  relative  to  breechface  of  gun  (in). 

RCRE(l)  Corresponding  external  radius  of  chamber  (in). 

AVENT(l)  Total  sidewall  vent  area  exposed  when  base  of  afterbody  is 

at  ZCRE(l)  (in2). 

ZCRE ( 2 )  Second  axial  position.  Starts  a  new  card. 

ZCRE (NZCRE)  Last  axial  position. 

RCRE (NZCRE) 

AVENT (NZCRE) 

File  [C28.2]  "Control  Charge  Type"  (5A4,2F10.0)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  KCTRL  *  0. 

(See  Files  [M2]  and  [C25] . ) 

GRNMCR  Name  of  propellant.  Up  to  20  alphanumeric  characters. 

WGTCR  Mass  of  control  charge  (lbm) . 

RHOPCR  Density  of  propellant  (lbm/ in3). 
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File  [C28.3]  "Control  Charge  Form  Function"  (I5,4F10.0)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  KCTRL  *  0. 

(See  Files  [M2]  and  [C25].) 

NFRMCR  Form  function  indicator.  See  discussion  of  File  [M8] . 

Allowable  values  of  NFRMCR  are  1,  2,  5,  6  and  7. 

ODCR  Grain  dimension  (in)  .  See  File  [M8]  . 

DPRFCR  Grain  dimension  (in) .  See  File  [M8]  . 

GLENCR  Grain  length  (in) . 

NPRFCR  Number  of  perforations  (-)  . 


File  [C28.4]  "Control  Charge  Burn  Rate  Counter"  (15)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  KCTRL  *  0. 

(See  Files  [M2]  and  [C25].) 

NBRDCR  Number  of  sets  of  values  used  to  describe  burn  rate. 

1  s  NBRDCR  s  10. 


File  [C28.5]  "Control  Charge  Burn  Rate  Description"  (8F10.0) 
One  to  Four  Cards 


N.B.  File  required  if  and  only  if  MODET  =  1  and  KCTRL  *  0. 
(See  Files  [M2]  and  [C25] . ) 


UPPCR(l) 

B22CR(1) 

BNNCR(l) 


Maximum  value  of  pressure  for  corresponding  values  of  burn 
rate  pre-exponential  and  exponential  factors  (psi) . 

Burning  rate  pre-exponential  factor  (in/sec-psin)  . 

Burning  rate  exponent  (-) . 


UPPCR (NBRDCR) 
B22 (NBRDCR) 
BNN (NBRDCR) 
B1CR 
DELCR 


Maximum  value  for  last  set  of  burn  rate  data. 
Corresponding  pre-exponent . 

Corresponding  exponent . 

Burning  rate  additive  constant  (in/sec) . 
Ignition  delay  (msec) . 
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File  [C28.6]  "Control  Charge  Thermochemistry"  (3F10.0)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  KCTRL  *  0. 

(See  Files  [M2]  and  [C25].) 

ECHCR  Internal  energy  released  in  combustion  (lbf-in/lbm) . 

GMCR  Molecular  weight  of  combustion  products  (lbm/lbmol) . 

GAMACR  Ratio  of  specific  heats  (-) . 


File  [C28.7]  "Properties  of  Deterred  Layer"  (8F10.0)  One  Card 

N.B.  File  required  if  and  only  if  MODET  =  1  and  KCTRL  *  0  and  INHBCR  =  1. 

(See  Files  [M2]  and  [C25]  . ) 

ECRIB*  Internal  energy  released  in  combustion  at  start  of  deterred 

layer  (lbf-in/lbm)  . 

ECRIB2  Internal  energy  released  in  combustion  at  end  of  deterred 

layer  (lbf-in/lbm)  . 

RGFCR  Factor  by  which  burn  rate  is  multiplied  at  start  of  deterred 

layer  (-)  . 

RGFCR2  Factor  by  which  burn  rate  is  multiplied  at  end  of  deterred 

layer  (-) . 

HIBXCR  Depth  of  inhibited  layer  (in) . 

*  Values  within  deterred  layer  deduced  by  linear  spacewise  interpolation. 

Final  values  need  not  be  the  same  as  those  of  the  undeterred  propellant. 


File  [C29]  "Forward  Boundary  Discharge  Data"  (8F10.0)  One  Card 
N.B.  File  required  if  and  only  if  INBCX  =  1.  (See  File  [M2].) 

FBAEX  Discharge  area  (in2)  . 

FBCD  Discharge  coefficient  (-) . 

FBPMIN  Pressure  required  to  open  forward  vent  (psi) .  Discharge 

begins  when  the  gas  pressure  exceeds  FBPMIN  and  then 
continues  as  long  as  it  exceeds  the  atmospheric  value. 
Backflow  is  not  considered. 
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File  [C30]  "Inbore  Rocket  Motor  Data”  (8F10.0)  Two  Cards 
N.B.  File  required  if  and  only  if  INBCX  =  2.  (See  File  (M2].) 

RMPO  Initial  mass  of  rocket  motor  propellant  (lbm)  . 

RECHEM  Chemical  energy  of  propellant  (Ibf-in/lbm)  . 

RPDEN  Density  of  propellant  (lbm/in3)  . 

RGAM  Ratio  of  specific  heats  of  motor  combustion  products  (-) . 

RMOLW  Molecular  weight  of  motor  combustion  products  (lbm/lbmol)  . 

RPOP  Operating  pressure  of  motor  (psi)  . 

RAPO  Initial  port  area  (in2)  . 

RTIG1  Delay  prior  to  first  venting  from  motor  (msec)  . 

RTIG2  Interval  from  onset  of  venting  to  operation  at  nominal 

pressure  RPOP  (msec) . 

RCDEN  Density  of  case  material  (lbm/in3)  . 

RCSTR  Tensile  yield  strength  of  case  material  (psi) . 

File  [C30.1]  ”Composition  of  Rocket  Motor  Combustion  Products”  (8F10.0) 
One  or  Two  Cards 

N.B.  File  required  if  and  only  if  INBCX  =  2  and  KMODE  *  0.  (See  File 
[M2]  .) 

RCYEE(l)  Mass  fraction  of  motor  combustion  products  corresponding 

•  to  species  1  (-) . 

RCYEE (NSPEC)  Mass  fraction  of  motor  combustion  products  corresponding  to 
species  NSPEC  (-)  . 
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File  [C31]  "ETG  Control  Switches"  (415)  One  Card 

N.B.  File  required  if  and  only  if  NETG  =  1.  (See  File  [M2] .) 

NETGS  Number  of  plasma  jet  data  sets  (-) .  1  £  NETGS  z  10. 

MODPET(l)  If  1,  propellant  type  1  will  have  surface  regression  rate 

described  by  usual  exponential  law  in  accordance  with  data 
of  File  [M10] . 

If  2,  propellant  type  1  will  have  surface  regression  rate 
described  by  Helmholtz  Law  with  data  as  given  in  File 
[C31.1] . 

If  3,  propellant  type  1  will  have  surface  regression  rate 
described  by  table  of  values  of  linear  regression  versus 
time  as  given  in  Files  [C31.2]  and  [C31.3] . 

If  4,  propellant  type  1  will  have  surface  regression  rate 
described  by  table  of  value  of  mass  burning  rate  versus  time 
as  given  in  Files  [C31.2]  and  [C31.3] . 

MODPET ( 2 )  Like  MODPET(l),  but  applying  to  propellant  type  2. 

MOD PET ( 3 )  Like  MODPET (1),  but  applying  to  propellant  type  3. 


N.B.  The  following  Files  [C31.3]  through  [C31.3]  are  repeated  as  a 
group  for  each  of  the  NPROP  propellants  for  which  MODPET  *  1 . 
(See  File  [C31] . ) 


File  [C31.1]  "I-th  Propellant  Helmholtz  Wiping  Coefficient"  (F10.0) 
One  Card 

N.B.  File  required  if  and  only  if  NETG  =  1  and  MODPET (I)  =  2. 

See  Files  [M2]  and  [C31].) 

ETPR2 ( I )  Wiping  coefficient  for  propellant  type  I  (-) . 


File  [C31.2]  "I-th  Propellant  Tabular  Regression  Rate  Counter"  (15) 
One  Card 

N.B.  File  required  if  and  only  if  NETG  =  1  and  MODPET (I)  =  3  or  4. 
(See  Files  [M2]  and  [C31].) 

NPDAT(I)  Number  of  pairs  of  data  in  File  [C31.3]  for  propellant 

type  I  (-)  .  1  <:  NPDAT  s  100. 


File  [C31.3]  "I-th  Propellant  Tabular  Regression  Rate  Data"  (2F10.0) 
NPDAT(I)  Cards 

N.B.  File  required  if  and  only  if  NETG  =  1  and  MODPET(I)  =  3  or  4. 

(See  Files  [M2]  and  [C31].) 

TDOTET(l,I)  First  value  of  time  (msec). 

RD0TET(1,I)  First  value  of  regression  rate.  If  MODPET(I)  =  3,  the  value 

is  understood  to  be  the  linear  regression  rate  (in/sec) .  If 
MODPET(I)  =  4,  the  value  is  understood  to  be  the  mass 
burning  rate  (Ibm/sec) . 

TDOTET (2,1)  Second  value  of  time.  Starts  a  new  card. 


RDOTET  (NPDAT  ( I )  ,  I ) 

N.B.  The  data  in  this  file  are  linearly  interpolated  within  the  table  range. 
The  first  or  last  values  are  used  outside  the  table  range.  If  the  rate 
is  constant,  one  pair  of  data  will  suffice. 


N.B.  The  following  Files  [C31.4]  through  [C32]  are  repeated  as  a  group  for 
each  of  the  NETGS  plasma  jets.  (See  File  [C31].) 


File  [C31.4]  "I-th  Plasma  Jet  File  Counters"  (215)  One  Card 

N.B.  File  required  if  and  only  if  NETG  =  1.  (See  File  [M2].) 

MODPLS  ( I )  If  MODPLS  ( I )  =  0,  the  plasma  mixing  length  is  assumed  to  be 

constant  and  the  flux  is  described  by  the  integrated  data  of 
Files  [C31.7]  and  [C31.8]. 

If  MODPLS (I)  -  1,  the  plasma  mixing  length  is  assumed  to 
vary  in  time  according  to  a  Prandtl  spreading  rate  criterion 
with  detailed  data  given  by  Files  [C31.9]  and  [C32] . 

If  MODPLS (I)  =  2,  the  plasma  mixing  length  is  assumed  to  be 
constant  and  the  flux  is  determined  by  the  capillary  model 
of  Powell  and  Zielinsky. 

NETDAT  ( I )  Number  of  sets  of  data  in  File  [C31.8]  or  [C32]  according  as 

MODPLS (I)  =  0  or  1  respectively.  2  £  NETDAT (I)  £  100. 


140 


File  [C31.5]  "Global  Properties  of  I-th  Plasma  Jet"  (5F10.0)  One  Card 
N.B.  File  required  if  and  only  if  NETG  =  1.  (See  File  [M2].) 

ETTOTE ( I )  Total  plasma  energy  (lbf-in) . 

ETTOTM ( I )  Total  plasma  mass  (lbf-in) . 

ETDIA(I)  Average  capillary  diameter  (in)  .  Only  required  if 

MODPLS(I)  =  1. 

ETAVGA ( I )  Average  ratio  of  specific  heats  of  plasma  (-)  . 

ETAVMtf  ( I )  Average  molecular  weight  of  plasma  (lbm/lbmol)  . 

File  [C31.6]  "Composition  of  I-th  Plasma  Jet"  (8F10.0)  One  Card 

N.B.  File  required  if  and  only  if  NETG  =  1  and  KMODE  *  0.  (See  File  [M2].) 

YETO  (1,1)  Mass  fraction  of  species  1  (-)  . 

YETO (I,NSPEC)  Mass  fraction  of  species  NSPEC  (-) . 

File  [C31.7]  "I-th  Plasma  Jet  Mixing  Length  Parameters  in  Integrated 
Format"  (3F10.0)  One  Card. 

N.B.  File  required  if  and  only  if  NETG  =  1  and  MODPLS(I)  =  0  or  2 . 

(See  Files  [M2]  and  [C31.4].) 

ETZO(I)  Distance  of  injection  point  from  breech  of  tube  (in). 

ETMIXL(I)  Mixing  length  (in). 

Fraction  of  plasma  flux  directed  to  internal  voidage  in 
cases  involving  dual-voidage  representation  of  flow  through 
propellant.  0  £  FRIN  £  1. 


FRIN(I) 


File  [C31.71]  "Plasma  Capillary  Data"  Unformatted.  One  Card. 

N.B.  This  File  is  only  required  if  NETG  =  1  and  MODPLS(I)  =  2. 

(See  Files  [M2]  and  [C31.4].) 

XXRI  Capillary  radius  (m)  . 

XXL  Capillary  length  (m)  . 

NPTS  Number  of  pairs  of  data  in  File  [C31.73] .  Must  not 

exceed  1000. 

ITMAX  Maximum  number  of  iterations  for  determination  of  plasma 

flux. 

File  [C31.72]  "Stoichiometry  Coefficients  for  Plasma  Model"  Unformatted. 
Eight  Cards. 

N.B.  This  File  is  only  required  if  NETG  =  1  and  MODPLS(I)  =  2. 

(See  Files  [M2]  and  [C31.4].) 

RRI(l)  First  value  (-) . 

RRI(2)  Second  value.  Starts  a  new  card. 

RRI(8)  Last  value. 

File  [C31.73]  "Current  History"  Unformatted.  NPTS  Cards. 

N.B.  This  File  is  only  required  if  NETG  =  1  and  MODPLS(I)  =  2. 

(See  Files  [M2]  and  [C31.4].) 

TPLAS(l)  First  value  of  time  (sec). 

XIPLAS(l)  Corresponding  value  of  current (amp)  . 

TPLAS(2)  Second  value  of  time.  Starts  a  new  card. 

XIPLAS (NPTS) 


142 


File  [C31.8]  "I-th  Plasma  Jet  Integrated  Data”  (4F10.0)  NETDAT(I)  Cards 

N.B.  File  required  if  and  only  if  NETG  =  1  and  MODPLS(I)  =  0. 

(See  Files  [M2]  and  [C31.4].) 

ETGT  (1,1)  First  value  of  time  (msec)  . 

ETGE (1,1)  Fraction  of  total  energy  delivered  by  time  ETGT (1/ I)  (-) - 

ETGM(1,I)  Fraction  of  total  mass  delivered  by  time  ETGT(1,I)  (-)• 

ETGU(1,I)  Axial  velocity  component  of  plasma  jet  at  time  ETGT  (1,1) 

(in/sec) . 

ETGT (2, I)  Second  value  in  time.  Starts  a  new  card. 

ETGU (NETDAT ( I )  ,  I )  . 

N.B.  Data  in  these  tables  are  linearly  interpolated  within  the  table  range. 
The  plasma  flux  is  assumed  to  be  zero  outside  the  table  range. 

File  [C31.9]  "I-th  Plasma  Jet  Mixing  Length  Parameters  in  Detailed  Format" 
(3F10.0)  One  Card 

N.B.  File  required  if  and  only  if  NETG  -  1  and  MODPLS(I)  =  1. 

(See  Files  [M2]  and  [C31.4].) 

ETZO(I)  Distance  of  injection  point  from  breech  of  tube  (in). 

ETPRl(I)  Dimensionless  spreading  rate  coefficient  (-) . 

FRIN(I)  Fraction  of  plasma  flux  directed  to  internal  voidage  in 

cases  involving  dual-voidage  representation  of  flow  through 
propellant.  0  £  FRIN  s  1. 
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File  [C32]  "I-th  Plasma  Jet  Detailed  Data”  (7F10.0)  NETDAT ( I )  Cards 


N.B.  File  required  if  and  only  if  NETG  =  1  and  MODPLS(I)  =  1. 
(See  Files  [M2]  and  [C31.4].) 


ETGT (1,1) 
ETGE ( 1 / I ) 
ETGM (1, I ) 
ETGU (1/ I ) 

ETGD (1, I) 

ETGAMd, 1) 


ETMOL (1,1) 


ETGT (2,1) 


First  value  of  time  (msec) . 

Fraction  of  total  energy  delivered  by  time  ETGT  (1,1)  (**)  • 

Fraction  of  total  mass  delivered  by  time  ETGM(1,I)  (~)  . 

Axial  velocity  component  of  plas  ma  jet  at  time  ETGT (1,1) 
(in/sec) . 

Diameter  of  exit  plane  of  capillary  at  time  ETGT (1,1)  (in). 

If  ETGD  is  entered  as  zero,  it  defaults  to  ETDIA. 

(See  File  [31.5] . ) 

Ratio  of  specific  heats  of  plasma  jet  at  time  ETGT (1,1) 

(-)  . 

If  ETGAM  is  entered  as  zero,  it  defaults  to  ETAVGA. 

(See  File  [C31.5.) 

Molecular  weight  of  jet  at  time  ETGT (1,1) 

(lbm/lbmol)  . 

If  ETMOL  is  entered  as  zero  it  defaults  to  ETAVMW. 

(See  File  [C31.5].) 

Second  value  of  time.  Starts  a  new  card. 


ETMOL (NETDAT (I)  ,1) 

N.B.  Data  in  these  tables  are  linearly  interpolated  within  the  table  range. 
The  plasma  flux  is  assumed  to  be  zero  outside  the  table  range. 
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N.B.  The  following  Files,  [TCI]  -  [TC17]  are  required  only  if  NTC  =  1  or  2 
(See  File  [M2] ) . 


File  [TCI]  "Traveling  Charge  Control  Data"  (715)  One  Card  TC-Mandatory 


IDEAL  Propellant  burn  rate  indicator, 

0  -  Measured  burn  rate  data.  See  Files  [TC5]  -  [TC8]  . 

1  -  Not  Supported. 

2  -  Ideal  burning  with  prespecified  value  of  pressure  on 
either  side  of  gas/traveling  charge  interface  or  of 
projectile  acceleration.  Note  the  discussion  of  SIGMAX, 
MACH,  APMAX  in  File  [TC2]  . 

Traveling  charge  treated  as  a  rigid. 

Traveling  charge  treated  as  a  continuum  with  analytical 
description  of  rheology.  File  [TC9]  required. 

Traveling  charge  treated  as  continuum  with  tabular 
description  of  rheology.  Files  [TC10]  and  [TC11] 
required. 

NPROP  Number  of  traveling  charge  increments  (maximum  of  20)  . 

NWFR  Propellant  Wall  Friction  Parameter. 

0  -  Friction  between  propellant  and  tube  not  considered. 

1  -  Friction  due  to  gas  film.  File  [TC12]  required. 

>0  -  Number  of  entries  in  velocity  dependent  coefficient  of 
friction  table  (maximum  of  10)  .  File  [TC13]  required. 

NBRES1  0  -  Obturator  resistance  not  given  as  table. 

>0  -  Number  of  entries  in  table  of  resistive  pressure  versus 
travel  (maximum  of  10)  .  File  [TC14]  required. 

NBRES2  0  -  Resistance  due  to  shocked  air  not  considered. 

1  -  Resistance  due  to  shocked  air  considered.  File  [TC15] 
required. 

Obturator  resistance  not  proportional  to  setback 
pressure. 

Number  of  entries  in  table  of  velocity  dependent 
coefficient  of  friction  of  obturator  (maximum  of  10) . 
Files  [TC16]  and  [TC17]  required. 


File  [TC2]  "Mesh  Parameters"  (I5,F10.0)  One  Card  TC-Mandatory 

MAXDIM  Maximum  number  of  mesh  points  to  be  used  in  continuum 

representation  of  traveling  charge  (  £  100)  . 

DXMIN  Minimum  mesh  size  for  continuum  representation  (in)  . 


NBRES3  0  - 

>0  - 


NPRC  0  - 

1  - 

2  - 


145 


File  [TC3]  "General  Properties"  (6F10.0)  One  Card  TC-Mandatory 


Diameter  of  tube  (in)  if  NTC  =  1  and  diameter  of  end  burning 
charge  if  NTC  =  2.  (See  File  [M2]). 

XIB  Initial  length  of  gas  column  (in) . 

PRM  Mass  of  projectile  (lbm)  . 

SIGMAX  Maximum  value  of  pressure  at  gas/propellant  interface  (psi) . 

If  SIGMAX  =  0,  no  restriction  is  considered.  SIGMAX  pertains 
to  the  reacted  or  the  unreacted  side  of  the  flame  according  as 
NPORS(KK)  as  o  or  1  respectively.  (See  File  [TC5]  . ) 

MACH  Maximum  value  of  Mach  number  of  combustion  products  relative 

to  regressing  surface.  If  MACH  =  0,  no  restriction  is 
considered. 

APMAX  Maximum  value  of  acceleration  of  projectile  (gravities) .  If 

APMAX  =  0,  no  restriction  is  considered. 


N.B.  Files  [TC4]  through  [TC13]  pertain  to  a  specific  type  of  propellant. 

The  sequence  [TC4]  through  [TC13] ,  subject  to  relevant  contingencies/ 
is  repeated  for  each  type  of  traveling  charge  propellant  in  the  problem. 
The  index  KK  used  in  the  following  file  descriptions  runs  through  the 
values  1/  2,  .  .  .  ,NPROP,  where  NPROP  is  defined  in  File  [TCI]. 


File  [TC4]  "Propellant  Thermochemical  Properties"  (8F10.0)  One  Card 

TC-Mandatory 


XGAM(KK) 

Ratio  of  specific  heats  of  gas  (-)  . 

XBV(KK) 

Covolume  (in3/lbm)  . 

XMOL(KK) 

Molecular  weight  (Ibm/lbmol). 

XECHEM(KK) 

Chemical  energy  of  propellant  (lbf-in/lbm) . 

XRHOP(KK) 

Density  of  solid  propellant  at  zero  pressure 

(lbm/ in3)  . 

XCM(KK) 

Mass  of  propellant  (lbm)  . 

XCRIT(KK) 

Time  delay  following  first  exposure  of  increment  base  before 
combustion  begins  (msec) . 

XDEL(KK) 

Time  interval  over  which  increment  combustion 
to  steady-state  value  (msec) . 

rate  increases 
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File  [TC5]  "Burn  Rate  Switches"  (215)  One  Card  TC-Mandatory 


MNBR1 (KK) 


NPORS (KK) 


0  -  Exponential  form  for  measured  burn  rate  description  of 
propellant  KK. 

1  -  Tabular  form  for  measured  burn  rate  description  of 

propellant  KK. 

2  -  Propellant  is  endburning  plasma  guided  design 

0  -  Measured  bum  rate  data  are  given  as  function  of 

pressure  on  reacted  side  of  flame.  Ideal  burn  rate 
value  SIGMAX  (see  File  [TC3] )  pertains  to  reacted  side. 
1  -  Measured  burn  rate  data  are  given  as  function  of 

pressure  on  unreacted  side  of  flame.  Ideal  burn  rate 
value  SIGMAX  pertains  to  unreacted  side. 


File  [TC6]  "Tabular  Burn  Rate  Data"  (2I5,F10.0)  One  Card  TC-Contingent 


N.B.  File  is  required  if  and  only  if  IDEAL  =  0  and  MNBRl(KK)  =  1. 

(See  Files  [TCI]  and  [TC5] . ) 

NBRP(KK)  Number  of  pairs  of  data  in  KK-th  tabular  description  of  burn 

rate  (maximum  of  20) . 

INTD  Number  of  table  entries  to  use  in  divided  difference 

interpolation.  The  same  value  is  assumed  for  all 
propellants. 

Bl(KK)  Burn  rate  additive  constant  for  KK-th  increment  (in/sec). 


File  [TC7]  "Tabular  Burn  Rate  Data  (cont’d)  (2F10.0)  NBRP(KK)  Cards 

TC-Contingent 


N.B.  File  is  required  if  and  only  if  IDEAL  =  0  and  MNBR1 (KK)  =  1. 

(See  Files  [TCI]  and  [TC5] . ) 

PE (1, KK)  First  value  of  pressure  in  tabular  description  of  burn  rate 

of  propellant  KK  (psi) . 

RP(1,KK)  First  value  of  burn  rate  of  propellant  KK  corresponding  to 

•  PE(1,KK)  (in/sec) . 


PE (NBP (KK) , KK) 
RP (NBRP (KK) , KK) 
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File  [TC7.1]  "Plasma  Guided  End  Burner"  (I5,F15.0)  1  card 

NBRM(I)  Number  of  sets  of  data  to  specify  combustion  rate. 

NBRM(I)  must  not  be  less  than  2  or  greater  than  100. 

EPLAS(I)  Total  energy  of  plasma  to  be  added  to  surface  of  increment. 

N.B.  The  subscript  I  indicates  that  as  many  as  20  separate  increments  may 
be  defined  for  the  endburning  grain,  each  with  distinct  properties. 

File  [TC7.2]  "Plasma  Guided  End  Burner  (Cont’d)  (3F10.0)  NBRM{I)  cards 

TBRM (1,1)  First  time  (msec). 

FBRM (1,1)  Fraction  of  mass  consumed  at  TBRM(l,l). 

PLAS  (1,1)  Fraction  of  plasma  energy  delivered  at  TBRM(1,I). 


TBRM (NBRM ( I )  ,  I ) 

N.B.  A  cubic  spline  is  fitted  to  these  data  and  is  then  explicitly 
differentiated  to  determine  a  continuously  varying  rate  as  required  by  the 
code.  Smooth  data  should  be  provided  since  the  spline  can  give  problems 
with  data  containing  high  order  structure.  The  rates  are  taken  to  be  zero 
times  less  than  TBRM(1,I)  and  are  set  equal  to  the  boundary  value  for 
times  greater  than  TBRM(NBRM(I) ,  I)  in  order  to  allow  for  complete 
consumption  of  the  increment  in  the  event  of  imperfect  integration. 

It  is  assumed  that  the  plasma  mass  can  be  neglected.  Also,  it  is 
assumed  that  there  is  no  net  delivery  of  plasma  across  the  surface  of  the 
grain  if  the  rate  of  regression  is  zero. 


File  [TC8]  "Exponential  Burn  Rate  Data"  (3F10.0)  One  Card  TC-Contingent 

N.B.  File  required  if  and  only  if  IDEAL  =  0  and  MNBRl(KK)  =  0. 

(See  Files  [TCI]  and  [TC5] . ) 


Bl(KK)  Burn  rate  additive  constant  for  KK-th  propellant  (in/sec). 

B2 (KK)  Burn  rate  pre-exponential  coefficient  for  KK-th  propellant 

(in/sec-psi"*)  . 

BN(KK)  Burn  rate  exponent  for  KK-th  propellant  (-)  . 
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File  [TC9]  "Propellant  Analytical  Rheology  Data"  (2F10.0)  One  Card 

TC-Contingent 


N.B.  File  required  if  and  only  if  NPRC  =  1.  (See  File  [TCI].) 

XAUP(KK)  Compressive  wave  speed  at  zero  pressure  in  analytical 

description  of  propellant  rheology  (in/sec) . 

XADWN(KK)  Expansion  wave  speed  in  analytical  description  of  propellant 

rheology  (in/sec).  If  XADWN(KK)  is  entered  so  that  it  is 
less  than  the  nominal  compressive  wave  speed,  the  loading 
value  is  used.  By  entering  XADWN(KK)  =  0,  a  reversible  law 
is  defined. 


File  [TC10]  "Propellant  Tabular  Rheology  Data"  (15)  One  Card 

TC-Contingent 


N.B.  File  required  if  and  only  if  NPRC  =  2.  (See  File  [TCI].) 


MNSS (KK)  Number  of  pairs  of  entries  in  tabular  description  of 

propellant  rheology  (maximum  of  20). 


File  [TC11]  "Propellant  Tabular  Rheology  Data"  (cont'd)  (3F10.0) 
MNSS (KK)  Cards  TC-Contingent 


N.B.  File  required  if  and  only  if  NPRC  =  2.  (See  File  [TCI].) 

PSTA(1,KK)  First  value  of  percent  strain  in  tabular  description  of 

propellant  rheology  (-)  . 

STRL(1,KK)  Corresponding  value  of  pressure  on  nominal  loading 

(compression  curve  (psi) ) . 

STRU (1,KK)  Corresponding  value  of  pressure  on  nominal  unloading 

•  (expansion  curve  (psi)). 


PSTA (MNSS (KK) , KK) 
STRL (MNSS (KK) , KK) 
STRU (MNSS (KK) , KK) 


File  [TC12]  "Ablative  Film  Data"  (2F10.0)  One  Card  TC-Contingent 

N.B.  File  required  if  and  only  if  NWFR  <  0.  (See  File  [TCI] .) 

VISLYR  (KK)  Viscosity  of  gas  film  used  to  lubricate  propellant 

(lbm/ in-sec)  . 

DELYR(KK)  Thickness  of  film. 


149 


File  [TC13]  "Propellant  Friction  Data"  (8F10.0)  One  to  Three  Cards 

TC-Contingent 

N.B.  File  required  if  and  only  if  NWFR  >  0.  (See  File  [TCI].) 

All  propellants  are  assumed  to  have  the  same  number  of  data  NWFR. 

AMUV(1, KK)  First  value  of  velocity  of  propellant  (in/sec). 

AMU(1,KK)  Corresponding  coefficient  of  friction  on  tube  (-)  . 


AMUV (NWFR, KK)  Last  value  of  velocity  (in/sec). 

AMU  (NWFR,  KK)  Corresponding  coefficient  of  friction  (-) . 


File  [TC14]  "Tabular  Bore  Resistance  Data"  (8F10.0)  One  to  Three  Cards 

TC-Contingent 

N.B.  File  required  if  and  only  if  NBRES1  *  0.  (See  File  [TCI].) 

BRX(l)  First  value  of  projectile  travel  (in). 

BR  ( 1)  Corresponding  value  of  resistive  pressure  due  to  obturator 

(psi) . 


BRX (NBRES1) 
BR(NBRESl) 


Last  value  of  projectile  travel  (in)  . 
Corresponding  value  of  resistive  pressure  (psi)  . 


File  [TC15]  "Barrel  Shock  Resistance  Data"  (4F10.0)  One  Card 

TC-Contingent 


N.B. 


AIRGAM 

AIRPO 

AIRTO 

AIRMW 


File  required  if  and  only  if  NBRES2  *  0.  (See  File  [TCI].) 
Ratio  of  specific  heats  of  air  (-)  . 

Pressure  of  air  in  barrel  (psi)  . 

Temperature  of  air  in  barrel  (R)  . 

Molecular  weight  of  air  in  barrel  (lbm/lbmol)  . 
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File  [TC16]  "Obturator  Setback  Resistance  Data"  (3F10.0)  One  Card 

TC-Contingent 

N.B.  File  required  if  and  only  if  NBRES3  *  0.  (See  File  [TCI].) 

PBMB  Mass  of  projectile  ahead  of  midpoint  of  obturating  band 

(Ibm)  . 

ELB  Length  of  bearing  section  of  obturating  band  (in)  . 

ANU  Poisson's  ratio  of  obturating  band  (  —  ) • 


File  [TC17]  "Obturator  Friction  Data"  (8F10.0)  One  to  Three  Cards 

TC-Contingent 

N.B.  File  required  if  and  only  if  NBRES3  *  0.  (See  File  [TCI]  . ) 

First  value  of  velocity  of  projectile  (in/sec) . 

Corresponding  value  of  coefficient  of  friction  between 
obturator  and  tube  (-) . 

Last  value  of  velocity  of  projectile  (in/sec). 
Corresponding  coefficient  of  friction  (-) . 

N.B.  The  following  Files  [TLC2]  -  [TLC22.7]  are  required  if  and  only  if 
NTLC  =  1  (See  File  [M2] ) . 


BMUV(l) 

BMU(l) 

BMUV (NBRES3 ) 
BMU (NBRES3 ) 


File  [TLC2]  "Option  Switches"  (315)  One  Card  TLC-Mandatory 


KIN1 


KIN2 


NXPEL 


If  0,  traveling  liquid  propellant  is  assumed  to  convert  to 
droplets  instantaneously  upon  discharge  into  region  where 
cavity  is  not  mechanically  stabilized. 

If  1,  propellant  converts  to  droplet  form  according  to 
finite  kinetic  law  which  depends  on  slip  velocity  at 
propellant/cavity  interface  in  region  where  cavity  is  not 
mechanically  stabilized.  File  [TLC9.1]  is  required. 

If  0,  droplets  are  assumed  to  burn  instantaneously  upon 
formation. 

If  1,  droplets  are  assumed  to  burn  according  to  finite  rate 
kinetic  law  which  depends  on  pressure.  File  [TLC9.2]  is 
required.  Solutions  based  on  KIN2  will  only  be  valid  if  the 
ratio  of  specific  heats  and  the  molecular  weight  are  not 
expected  to  vary,  and  provided  that  droplets  are  not  swept 
back  into  the  booster  region. 

If  0,  a  TC  expulsion  charge  is  not  located  in  the  projectile 

base.  . 

If  a  TC  expulsion  charge  is  located  in  the  projectile 

base  and  Files  [TLC22.1]  -  [TLC22.7]  are  required. 
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File  [TLC5]  "Integration  Parameters"  (I5,2F10.0)  One  Card  TLC-Mandatory 


NMSHLC  Number  of  mesh  points  assigned  to  traveling  liquid  charge. 

Must  be  at  least  6  unless  NCAV  =  0  (See  File  [TLC11]  )  . 
Suggested  value  is  11. 

DZMNLC  Minimum  mesh  spacing  in  traveling  liquid  charge  (in)  . 

Convergence  tolerance  for  iterative  determination  of  fluxes 
between  lumped  parameter  regions  (10‘6  lbm2/sec2)  .  Default 
value  is  1.0.  Suggested  value  is  0.01. 

N.B.  The  value  of  2  *  NMSHLC  must  not  exceed  95. 


File  [TLC6]  "Tube  Properties"  (2I5,F10.0)  One  Card  TLC-Mandatory 


NBRES1  If  0,  obturator  resistance  is  neglected. 

If  >  0,  NBRES1  is  the  number  of  tabular  entries  used  to 
define  the  obturator  resistance  as  a  function  of  travel. 
NBRES1  must  not  be  greater  than  8.  File  [TLC6.1]  is 
required  in  this  case. 

NBRES2  If  0,  resistance  due  to  shocked  air  in  front  of  projectile 

is  neglected. 

If  1,  resistance  due  to  shocked  air  is  considered. 

File  [TLC6.2]  is  required  in  this  case. 

DB  Diameter  of  gun  tube  (in)  . 


File  [TLC6.1]  "Obturator  Resistance"  (8F10.0)  One  or  Two  Cards 

TLC-Mandatory 

N.B.  File  required  if  and  only  if  NBRES1  >  0. 

BRZ(l)  First  value  of  projectile  travel  (in). 

BR  ( 1)  Corresponding  value  of  obturator  resistance  (psi) . 


BRZ (NBRES1)  Last  value  of  projectile  travel  (in). 

BR(NBRESl)  Corresponding  value  of  bore  resistance  (psi). 
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File  [TLC6.2]  "Air  Shock  Resistance  Data"  (8F10.0)  One  Card 

TLC-Mandatory 


N.B. 


AIRPO 
AIRTO 
AIR GAM 
AIRMW 


File  required  if  and  only  if  NBRES2  : 

Initial  pressure  of  gas  in 
Initial  temperature  of  gas 
Ratio  of  specific  heats  of 
Molecular  weight  of  gas  in 


=  1. 

barrel  (psi) . 
in  barrel  (R) . 
gas  in  barrel  (-)  . 
barrel  (lbm/lbmol)  . 


File  [TLC7]  "Projectile  Properties"  (8F10.0)  One  Card  TLC-Mandatory 


PRM  Projectile  mass  (lbm)  . 

2PR0  Initial  location  of  projectile  base  with  respect  to 

entrance  of  gun  tube  (in)  . 

N.B.  This  datum  does  not  take  into  account  the  possible  presence  of  an 

afterbody  used  to  stabilize  the  traveling  liquid  charge.  The  base  of 
the  afterbody  is  located  a  distance  ZCAV(NCAV)  -  ZCAV(l)  behind  the 
projectile  base.  (See  File  [TLC11.1].)  Accordingly,  even  if  ZPRO  is 
positive,  it  is  possible  that  the  data  base  may  represent  the 
afterbody  as  intruding  into  the  booster  combustion  chamber.  The 
analysis  of  the  combustion  chamber  by  XKTC  is  only  performed  to  the 
base  of  the  afterbody.  Errors  will  occur  if  the  afterbody  intrudes 
into  the  chamber  and  the  chamber  diameter  differs  from  that  of  the 
tube. 

ZVENT 


RHOCAV 

PCAV 


Projectile  travel  after  which  traveling  liquid  charge  begins 
to  vent  rearwards  from  mechanically  stabilized  region. 

Density  of  afterbody  material  (lbm/in3)  . 

Pressure  at  which  traveling  liquid  charge  separates  from 
base  of  projectile  (psi) . 


File  [TLC7.1]  "Chamber  Length"  (F10.0)  One  Card  TLC-Mandatory 


CHAMLN  Distance  from  breech  to  entrance  of  tube  (in)  . 
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File  [TLC9]  "Properties  of  Liquid  Propellant"  (8F10.0)  One  Card 

TLC-Mandatory 


RHOL 

BUL1 

BUL2 

EFL 

GAML 

GML 

BVL 


Density  of  liquid  propellant  at  one  atmosphere  (lbm/in3)  . 

Bulk  modulus  of  liquid  propellant  at  one  atmosphere  (psi)  . 

Derivative  of  bulk  modulus  with  respect  to  pressure  at  one 
atmosphere  (-) . 

Chemical  energy  released  in  combustion  (Ibf-in/lbm)  . 

Ratio  of  specific  heats  of  products  of  combustion  (-)  . 
Molecular  weight  of  products  of  combustion  (lbm/lbmol) . 
Covolume  of  products  of  combustion  (in3/lbm)  . 


File  [TLC9.1]  "Propellant  Droplet  Formation  Data"  (8F10.0)  One  Card 

TLC-Contingent 

N.B.  This  file  is  required  if  and  only  if  KIN1  =  1. 

DROP  Diameter  of  propellant  droplets  (in)  .  This  datum  applies  to 

both  the  traveling  and  the  booster  increments. 

WIPE  Coefficient  of  proportionality  between  rate  of  droplet 

formation  and  slip  velocity  for  traveling  liquid  charge  in 
mechanically  unstabilized  region  (lbm/in) . 


File  [TLC9.2]  "Droplet  Burn  Rate  Data"  (8F10.0)  One  Card  TLC-Contingent 
N.B.  This  file  is  required  if  and  only  if  KIN2  =  1. 

B1  Additive  burn  rate  constant  (in/sec)  . 

B2  Burn  rate  pre-exponential  factor  (in/sec/psiBN)  . 

BN  Burn  rate  exponent  (-)  . 
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File  [TCL10]  "Initial  Conditions"  (8F10.0)  One  Card  TLC-Mandatory 


PSTG 

PSTLT 

TEMST 

GAMST 

GMOLST 

N.B. 


Initial  pressure  of  gas  (psi) . 

Initial  pressure  of  traveling  charge  (psi) . 

Initial  temperature  (R) . 

Ratio  of  specific  heats  of  initial  ambient  in  TLC  (-) . 
Molecular  weight  of  initial  ambient  in  TLC  (Ibm/lbmol) . 
GAMST  and  GMOLST  are  not  required  by  RLPTC. 


File  [TLC11]  "Initial  Cavity  Parameters"  (215)  One  Card  TLC-Mandatory 


NCAV  Number  of  tabular  data  used  to  describe  initial 

configuration  of  cavity.  Maximum  of  50.  If  NCA.V  =  0, 
it  is  understood  that  there  is  no  traveling  liquid  charge 
present.  The  subsequent  data  of  this  file  are  not  required. 

MECH  If  o,  cavity  is  not  mechanically  stabilized  and  its  behavior 

is  governed  by  the  Taylor  principle. 

If  1,  cavity  is  stabilized  and  its  geometry  is  taken  to  be 
frozen  directly  behind  the  projectile  into  the  configuration 
defined  by  the  initial  data. 
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File  [TLC11.1]  "Initial  Cavity  Geometry"  (3F10.0)  NCAV  Cards 

TLC-Contingent 


N.B.  This  file  is  required  if  and  only  if  NCAV  >  0. 


ZCAV(l) 


RCAV.(l) 

THKV(l) 


ZCAV  (2 ) 


First  axial  location  for  definition  of  initial  cavity 
geometry  (in) .  Starts  a  new  card.  The  cavity  defined  by 
these  data  must  formally  extend  to  the  projectile  base. 

Zero  values  of  RCAV  may  be  used  to  represent  sections  of  the 
traveling  liquid  charge  which  fill  the  cross-section  of  the 
tube.  It  is  always  understood  that  ZCAV  (NCAV)  corresponds 
to  the  base  of  the  projectile.  This  latter  assumption  is 
always  enforced  internally  to  the  code  by  adding  a  suitable 
value  to  the  values  of  ZCAV(I),  1  =  1,...  ,NCAV. 

Corresponding  radius  of  cavity  (in) . 

Thickness  of  mechanically  stabilizing  layer  (in) .  Only  used 
if  MECH  =  1.  If  THKV  >  0,  it  is  understood  that  RCAV  refers 
to  the  exterior  of  the  surface.  The  thickness  is  measured 
in  the  radial  direction  rather  than  normal  to  the  surface  of 
the  stabilizing  layer. 

Second  axial  location.  Starts  a  new  card. 


THKV (NCAV) 


File  [TLC22.1] 

"Properties  of  TLC  Expulsion  Charge  Combustion  Chamber" 
(8F10.0)  One  Card  TLC-Contingent 

N.B.  This  file 

is  required  if  and  only  if  NXPEL  =  1. 

CDCR ( 2 ) 

Discharge  coefficient  for  venting  to  traveling  charge 
region  (-) . 

ACRI (2) 

Venting  area  (in2)  . 

VCRO ( 2 ) 

TC  expulsion  charge  chamber  volume  (in3)  . 

PSTCR ( 2 ) 

Initial  Pressure  (psi) . 

TSTCR ( 2 ) 

Initial  Temperature  (R) . 

DELPST ( 2 ) 

Pressure  differential  between  expulsion  charge  combustion 
chamber  and  forward  end  of  TC  to  initiate  venting  (psi) . 
Once  ventholes  open,  they  stay  open. 
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File  [TLC22.2]  "TLC  Expulsion  Charge  Type"  (5A4,2F10.0)  One  Card 

TLC-Contingent 


N.B.  This  file 
GRNMCR ( 2 ) 

WGTCR  (2) 

RHOPCR ( 2 ) 


is  required  if  and  only  if  NXPEL  =  1. 

Name  of  propellant.  Up  to  20  alphanumeric  characters. 
Mass  of  TC  expulsion  charge  (lbm)  . 

Density  of  propellant  (lbm/in3)  . 


File  [TLC22.3]  "TLC  Expulsion  Charge  Form  Function"  (I5,4F10.0)  One  Card 

TLC- Contingent 


N.B.  This  file 
NFRMCR (2 ) 

ODCR (2) 

DPRFCR (2 ) 

GLENCR ( 2 ) 

NPRFCR (2) 


is  required  if  and  only  if  NXPEL  =  1. 

Form  function  indicator.  See  discussion  of  File  [M8] . 
Allowable  values  of  NFRMCR  are  1,  2,  5,  6,  and  7. 

Grain  dimension  (in) . 

Grain  dimension  (in) . 

Grain  dimension  (in) . 

Number  of  perforations  (-)  . 


File  [TLC22.4]  "TLC  Expulsion  Charge  Burn  Rate  Counter"  (215)  One  Card 

TLC-Contingent 


N.B.  This  file  is  required  if  and  only  if  NXPEL  =  1. 

NBRDCR (2 )  Number  of  sets  of  values  used  to  describe  burn  rate. 

1  s  NBRDCR  s  10. 

INHBCR ( 2 )  If  0,  propellant  is  not  deterred. 

If  1,  propellant  is  deterred  and  File  ITLC22.7]  is  required. 
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File  [TLC22.5]  "TLC  Expulsion  Charge  Burn  Rate  Description”  (8F10.0) 

One  to  Four  Cards  TLC-Contingent 

N.B.  This  file  is  required  if  and  only  if  NXPEL  =  1. 

UPPCR (1,2)  Maximum  value  of  pressure  for  corresponding  values  of  burn 

rate  pre-exponential  and  exponential  factors  (psi) . 

B22CR(1,2)  Burning  rate  pre-exponential  factor  (in/sec-psin)  . 

BNNCR (1/2)  Burning  rate  exponent  (-)  . 

UPPCR (NBRDCR ( 2 )  ,2)  Maximum  value  for  last  set  of  burn  rate  data. 

B22 (NBRDCR (2) , 2)  Corresponding  pre-exponent. 

BNN ( NBRDCR (2) ,2)  Corresponding  exponent . 

B1CR(2)  Burning  rate  additive  constant  (in/sec). 

DELCR (2 )  Ignition  delay  (msec). 


File  [TLC22.6]  "TLC  Expulsion  Charge  Thermochemistry”  (8F10.0)  One  Card 

TLC-Contingent 

N.B.  This 
ECHCR ( 2 ) 

GMCR  ( 2 ) 

GAMACR ( 2 ) 


file  is  required  if  and  only  if  NXPEL  *  1. 

Internal  energy  released  in  combustion  (lbf-in/lbm. ) 
Molecular  weight  of  combustion  products  (lbm/lbmol)  . 
Ratio  of  specific  heats  (-)  . 
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File  [TLC22.7]  "Properties  of  Deterred  Layer"  (8F10.0)  One  Card 

TLC-Contingent 

N.B.  This  file  is  required  if  and  only  if  NXPEL  =  1  and  INHBCR(2)  =  1. 

ECRIB (2) *  Internal  energy  released  in  combustion  at  start  of 

deterred  layer  (lbf-in/lbm)  . 

ECRIB2 (2 )  Internal  energy  released  in  combustion  at  end  of  deterred 

layer  (lbf-in/lbm) . 

RGFCR ( 2 )  Factor  by  which  burn  rate  is  multiplied  at  start  of 

deterred  layer  (-) . 

RGFCR2 (2 )  Factor  by  which  burn  rate  is  multiplied  at  end  of 

deterred  layer  (-) . 

HIBXCR (2 )  Depth  of  inhibited  layer  (in). 

*  Values  within  deterred  layer  deduced  by  linear  spacewise  interpolation 
Final  values  need  not  be  the  same  as  those  of  the  undeterred  propellant. 
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Intentionally  left  blank. 
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NO.  OF 

COPIES  ORGANIZATION 


NO.  OF 

COPIES  ORGANIZATION 


2  DEFENSE  TECHNICAL 

INFORMATION  CENTER 
DTIC  DDA 

8725  JOHN  J  KINGMAN  RD 
STE  0944 

FT  BELVOIR  VA  22060-6218 

1  HQDA 

DAMOFDT 

400  ARMY  PENTAGON 

WASHINGTON  DC  203 1 0-0460 

1  OSD 

OUSD(A&T)/ODDDR&E(R) 
RJTREW 
THE  PENTAGON 
WASHINGTON  DC  20301-7100 

1  DPTY  CG  FOR  RDA 

US  ARMY  MATERIEL  CMD 
AMCRDA 

5001  EISENHOWER  AVE 
ALEXANDRIA  VA  22333-0001 

1  INST  FOR  ADVNCD  TCHNLGY 

THE  UNTV  OF  TEXAS  AT  AUSTIN 
PO  BOX  202797 
AUSTIN  TX  78720-2797 

1  DARPA 

BKASPAR 

3701  N  FAIRFAX  DR 

ARLINGTON  VA  22203-1714 

1  US  MILITARY  ACADEMY 

MATH  SCI  CTR  OF  EXCELLENCE 

MADN  MATH 

MAJ  HUBER 

THAYER  HALL 

WEST  POINT  NY  10996-1786 

1  DIRECTOR 

US  ARMY  RESEARCH  LAB 
AMSRLD 
D  R  SMITH 

2800  POWDER  MILL  RD 
ADELPHI MD  20783-1 197 


1  DIRECTOR 

US  ARMY  RESEARCH  LAB 
AMSRLDD 

2800  POWDER  MILL  RD 
ADELPHI  MD  20783-1 197 

1  DIRECTOR 

US  ARMY  RESEARCH  LAB 
AMSRL  Cl  AI R  (RECORDS  MGMT) 
2800  POWDER  MILL  RD 
ADELPHI  MD  20783-1 145 

3  DIRECTOR 

US  ARMY  RESEARCH  LAB 
AMSRL  Q  LL 
2800  POWDER  MILL  RD 
ADELPHI  MD  20783-1 145 

1  DIRECTOR 

US  ARMY  RESEARCH  LAB 
AMSRL  Cl  AP 
2800  POWDER  MILL  RD 
ADELPHI  MD  20783-1 197 


ABERDEEN  PROVING  GROUND 

4  DIRUSARL 

AMSRL  Cl  LP  (BLDG  305) 
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NO.  OF 

COPIES  ORGANIZATION 


NO.  OF 

COPIES  ORGANIZATION 


1  CHAIRMAN 

DOD  EXPLOSIVES  SAFETY  BOARD 
ROOM  856-C 
HOFFMAN  BLDG  1 
2461  EISENHOWER  AVE 
ALEXANDRIA  VA  22331-0600 

1  US  ARMY  BALLISTIC  MISSILE 

DEFENSE  SYS  CMD 
ADVANCED  TECH  CTR 
PO  BOX  1500 

HUNTSVILLE  AL  35807-3801 

1  DEPT  OF  THE  ARMY 

OFC  OF  THE  PRODUCT  MANAGER 
155MM  HOWITZER 
MI  09A6  PALADIN 
SFAE  ARHIP  IP 
R  DE  KLEINE 

PICATINNY  ARSENAL  NJ  07806-5000 
3  PM 

ADVANCED  FIELD  ARTILLERY  SYS 
SFAE  ASM  AFE 
J  SHIELDS 

PICATINNY  ARSENAL  NJ  07801-5000 

1  PM 

ADVANCED  FIELD  ARTILLERY  SYS 
SFAE  ASM  AF  Q 

PICATINNY  ARSENAL  NJ  07801-5000 

2  COMMANDER 

PRODUCTION  BASE  MODERNIZATION 

AGENCY 

ARDEC 

AMSMCPBM 

A  SIKLOSI 

L  LAIBSON 

PICATINNY  ARSENAL  NJ  07806-5000 

1  PEO  ARMAMENTS 

PMTMAS 
AMCPMTMA 

PICATINNY  ARSENAL  NJ  07806-5000 

1  PEO  ARMAMENTS 

PMTMAS 
AMCPMTMA  105 

PICATINNY  ARSENAL  NJ  07806-5000 


1  PEO  ARMAMENTS 

PM  TMAS 
AMCPM  TMA  120 

PICATINNY  ARSENAL  NJ  07806-5000 

1  PEO  ARMAMENTS 
PM  TMAS 
AMCPM  TMA  AS 
HYUEN 

PICATINNY  ARSENAL  NJ  07806-5000 

2  COMMANDER 
ARDEC 

AMSTA  AR  CCH  V 
C  MANDALA 
E  FENNELL 

PICATINNY  ARSENAL  NJ  07806-5000 

1  COMMANDER 

ARDEC 

AMSTA  AR  CCH  T 
L  ROSENDORF 

PICATINNY  ARSENAL  NJ  07806-5000 

1  COMMANDER 

ARDEC 

AMSTA  AR  CCS 

PICATINNY  ARSENAL  NJ  07806-5000 

I  COMMANDER 
ARDEC 

AMSTA  ARAEE 
JLANNON 

PICATINNY  ARSENAL  NJ  07806-5000 

II  COMMANDER 
ARDEC 

AMSTA  AR  AEE  B 
A  BEARDELL 
D  DOWNS 
S  EINSTEIN 
S  WESTLEY 
S  BERNSTEIN 
J  RUTKOWSKI 
B  BRODMAN 
P  OREILLY 
R  CIRINCIONE 
PHUI 
J  OREILLY 

PICATINNY  ARSENAL  NJ  07806-5000 
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NO.  OF 

COPIES  ORGANIZATION 


NO.  OF 

COPIES  ORGANIZATION 


5  COMMANDER 
ARDEC 

AMSTAARAEE  WW 
M  MEZGER 
J  PINTO 
D  WIEGAND 
PLU 
CHU 

PICATINNY  ARSENAL  NJ  07806-5000 

1  COMMANDER 

ARDEC 

AMSTA  AR  AES 
S  KAPLOWITZ 

PICATINNY  ARSENAL  NJ  07806-5000 

1  COMMANDER 

ARDEC 

AMSTA  ARHFM 
E  BARRIERES 

PICATINNY  ARSENAL  NJ  07806-5000 

1  COMMANDER 

ARDEC 

AMSTA  ARFSAF 
LTCR  RIDDLE 

PICATINNY  ARSENAL  NJ  07806-5000 

1  COMMANDER 

ARDEC 

AMSTA  ARFSC 
G  FERDINAND 

PICATINNY  ARSENAL  NJ  07806-5000 

1  COMMANDER 

ARDEC 
AMSTA  ARFS 
TGORA 

PICATINNY  ARSENAL  NJ  07806-5000 

1  COMMANDER 

ARDEC 

AMSTA  ARFS  DH 
J  FENECK 

PICATINNY  ARSENAL  NJ  07806-5000 


3  COMMANDER 

ARDEC 

AMSTA  AR  FSS  A 
RKOPMANN 
B  MACHEK 
LPINDER 

PICATINNY  ARSENAL  NJ  07806-5000 

1  COMMANDER 
ARDEC 

AMSTA  ARFSNN 
K CHUNG 

PICATINNY  ARSENAL  NJ  07806-5000 

2  DIRECTOR 

BENET  WEAPONS  LAB 
AMSTA  ARCCBRA 
GAPFLEGL 
AMSTA  ARCCBS 
F  HEISER 

WATERVLIETNY  12189-4050 

2  COMMANDER 

US  ARMY  RSRCH  OFC 
TECH  LIB 
D  MANN 
POBOX  12211 

RESEARCH  TRIANGLE  PARK  NC 
27709-2211 

1  DIRECTOR 

US  ARMY  RSRCH  OFC 
AMXROMCS 
K CLARK 
PO  BOX  12211 

RESEARCH  TRIANGLE  PARK  NC 
27709-2211 

1  DIRECTOR 

US  ARMY  RSRCH  OFC 
AMXRORTIP 
LIBRARY  SERVICES 
POBOX  12211 

RESEARCH  TRIANGLE  PARK  NC 
27709-2211 
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NO.  OF 

COPIES  ORGANIZATION 


NO.  OF 

COPIES  ORGANIZATION 


1  COMMANDER 

USACECOM 
R&D  TECH  LIB 
ASQNC  ELC  IS  L  R 
MYER  CENTER 

FORT  MONMOUTH  NJ  07703-5301 

1  COMMANDANT 

US  ARMY  AVIATION  SCHOOL 
AVIATION  AGENCY 
FORT  RUCKER  AL  36360 

1  PM 

US  TANK  AUTOMOTIVE  CMD 
FIGHTING  VEHICLE  SYS 
SFAE  ASM  BV 
WARREN  MI  48397-5000 

1  PM 

ABRAMS  TANK  SYS 
SFAE  ASM  AB 
WARREN  MI  48397-5000 

1  DIRECTOR 

HQ  TRAC  RPD 
ATCDMA 

FORT  MONROE  VA  2365 1-5 143 

1  COMMANDER 

US  ARMY  BELVOIR  RSRCH 
DEVELOPMENT  CTR 
STRBEWC 

FORT  BELVOIR  VA  22060-5006 

1  DIRECTOR 

US  ARMY  TRAC 

ATRCL 

MR  CAMERON 

FORT  LEE  VA  23801-6140 

1  COMMANDANT 

US  ARMY  CMD  &  GENERAL 

STAFF  COLLEGE 

FORT  LEAVENWORTH  KS  66027 

1  COMMANDANT 

US  ARMY  SPECIAL  WARFARE  SCHOOL 
REV  AND  TRNG  LIT  DIV 
FORT  BRAGG  NC  28307 


1  COMMANDER 

RADFORD  ARMY  AMMUNITION  PLANT 
AMSTA  AR  QA  HI  LIB 
RADFORD  VA  24141-0298 

2  COMMANDANT 

US  ARMY  FIELD  ARTILLERY  CTR  & 

SCHOOL 

ATSF  CO  MW 

E  DUBLISKY 

ATSF  CN 

P  GROSS 

FORT  SILL  OK  73503-5600 

1  COMMANDANT 

US  ARMY  ARMOR  SCHOOL 
ATZK  CD  MS 
M  FALKOVITCH 
ARMOR  AGENCY 
FORT  KNOX  KY  40121-5215 

1  US  ARMY  EUROPEAN  RSRCH  OFC 
USARDSG  UK 

BOX  65 

FPONY  09510-1500 

2  COMMANDER 
NSSC 

SEA  62R 
SEA  64 

WASHINGTON  DC  20362-5101 

1  COMMANDER 

NASC 

AIR  954  TECH  LIB 
WASHINGTON  DC  20360 

4  COMMANDER 

NATL  RSRCH  LAB 
TECH  LIB  CODE  4410 
K  KAILASANATE 
J  BORIS 
E  ORAN 

WASHINGTON  DC  20375-5000 

1  OFC  OF  NAVAL  RSRCH 

CODE  473  R  S  MILLER 
800  N  QUINCY  ST 
ARLINGTON  VA  22217-9999 
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NO.  OF 

COPIES  ORGANIZATION 


1  OFC  OF  NAVAL  TECH 

ONT  213 
D  SIEGEL 
800  N  QUINCY  ST 
ARLINGTON  VA  22217-5000 

9  COMMANDER 

NSWC 
T  C  SMITH 
KRICE 
S  MITCHELL 
S  PETERS 
J  CONSAGA 
C  GOTZMER 
RBERNECKER 
TECH  LIB  CODE  730 
INDIAN  HEAD  MD  20640-5000 

4  COMMANDER 
NSWC 

CODE  G30  GUNS  &  MUNITIONS  DIV 
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